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I .  INTRODUCTION 


A.  BACKGROUND 

The  United  States  Army  currently  possesses  the  most 
advanced  tank  in  the  world,  the  Ml  Main  Battle  Tank.  It  is 
able  to  move  faster,  shoot  more  accurately,  and  maneuver 
better  than  any  comparable  system.  Yet  the  emphasis  on 
mobility  and  the  high  degree  of  technical  sophistication 
which  we  have  placed  on  the  Ml  may  be  negated  by  even  a 
World  War  II  vintage  anti-tank  mine.  The  use  and 
effectiveness  of  landmines  against  tanks  have  substantially 
increased  since  World  War  I,  while  our  ability  to  counter 
the  landmine  threat  has  not  changed  dramatically  in  the 
last  40  years.  Proponency  disagreements  appear  to  have 
hindered  the  thorough  formulation  and  development  of  a 
comprehensive  mine  clearing  system  while  the  search  for  and 
development  of  one  device  that  would  effectively  perform 
all  countermine  functions  has  been  understandably  futile. 

While  there  have  been  substantial  advances  in  the 
development  of  new  types  of  mines  and  minelaying  equipment, 
the  methods  of  detecting  and  clearing  mines  still  leave 
much  to  be  desired  [Ref.  1].  There  are  still  very  few  mine 
detectors  which  will  detect  nonmetallic  mines,  the  most 
likely  type  to  be  found  on  the  battlefield  today.  Once  the 
mines  have  been  detected  they  must  be  cleared  or  bypassed. 

The  United  States  has  been  developing  several  systems  to 
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enable  units  to  breach  complex  obstacles.  Two  of  these  are 
the  track  width  mine  plow  (TWMP)  and  the  track  width  mine 
roller  (TWMR).  Both  the  plow  and  the  roller  have  inherent 
strengths  and  weaknesses,  and  neither  of  them  is  totally 
effective. 

B.  PURPOSE  AND  GOALS 

Although  detailed  combat  models  (such  as  JANUS  or 
CASTFOREM)  are  heavily  used  at  the  tactical  level,  some 
analysts  and  users  have  doubts  about  the  use  of  this  kind 
of  model  when  evaluating  the  impact  of  a  new  piece  of 
equipment  entering  the  inventory.  Detailed  combat  models 
are  costly  to  build,  costly  to  run,  are  quite  demanding  in 
data  base  requirements,  not  easily  modified,  essentially 
impossible  to  use  for  sensitivity  analysis  and  other 
parametric  studies,  and  not  easily  communicated  to  decision 
makers . 

On  the  other  hand,  a  model  can  be  built  rather  quickly 
and  inexpensively  in  order  to  axiswer  questions  of  a 
particular  nature.  The  model  is  written  with  specific 
goals  in  mind  and  specific  output  desired.  Development  of 
that  type  of  model  is  the  subject  of  this  thesis.  It 
examines  various  mixes  of  the  TWMP  and  the  TWMR  with  the 
goal  of  determining  the  optimal  type  and  number  of  systems 
that  can  effectively  be  used  to  breach  a  series  of 
minefields  by  an  armor  battalion.  The  countermine  mix  must 
provide  effective  mine  neutralization  in  the  breached  lanes 
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for  the  assault  with  minimum  loss  of  momentum  and  time,  and 
minimize  breaching  and  assault  force  losses  due  to  mine 
detonations . 

By  constructing  the  model  in  this  fashion,  the  number 
of  variables  that  could  impact  on  the  output  is  kept  to  a 
minimum  and  the  output  and  analysis  will  provide  results 
with  an  acceptable  degree  of  accuracy. 

C.  METHODOLOGY 

Through  the  use  of  a  high  resolution  combat  simulation 
using  clearing  and  survivability  data,  output  is  generated 
which  is  analyzed  and  then  evaluated  under  various  measures 
of  effectiveness  which  have  been  developed  to  provide 
comparisons  between  different  force  and  equipment 
configurations.  Figure  1  demonstrates  the  process  by  which 
the  evaluation  will  take  place.  Entering  the  configuration 
or  inventory,  the  minefield  parameters  and  enemy  actions, 
and  the  assault  force's  actions  and  decisions  into  the 
simulation  model  results  in  an  exiting  vehicle  inventory, 
transit  times  and  unit  status  codes  which  are  then  used  to 
evaluate  the  desired  measures  of  effectiveness. 

In  Chapter  2,  the  Concepts  of  Mobility  and  Operations 
are  discussed.  Additionally,  a  discussion  of  the  options 
available  to  a  unit  commander  in  countering  are  examined  in 
detail.  The  characteristics  of  the  breaching  equipment. 
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Functional  Simulation  and  Analysis  Model 


Enemy  Actions 
Minefield  Parameters 

Entering 
Inventoi^ 

f 

Assault  Force 
Actions 

Decision  Variables 

Figure  1.  Functional  Simulation  and  Analysis  Model 

their  normal  employment  and  the  development  of  the  measures 
of  effectiveness  used  to  analyze  the  output  from  the 
simulation  are  examined. 

In  Chapter  3,  the  layout  and  flow  of  the  simulation  are 
discussed,  along  with  detailed  descriptions  of  the  various 
modules  that  compose  the  model.  The  tactical  scenario  which 
was  used  in  the  model  development  and  simulation  is 
included. 

Chapter  4  deals  with  the  output  analysis  and  evaluation 
of  the  measures  of  effectiveness  used  to  determine  the 
optimal  force  structure. 
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Finally,  Chapter  5  provides  recommendations  for 
possible  future  enhancements  to  the  model  as  well  as 
possible  utilizations  of  this  model  and  other  models  of 
this  type.  In  the  appendices,  variables  used  in  the 
simulation  are  defined,  the  computer  code  is  listed  and 
described  in  detail,  and  the  data  files  used  in  the 
simulation  are  presented. 


II.  NATURE  OF  THE  COUNTERMINE  PROBLEM 


A.  CONCEPT  OF  OPERATIONS  AND  MOBILITY 

Mobility  is  oriented  toward  reducing  or  negating  the 
effects  of  existing  or  reinforcing  obstacles  to  improve 
movement  of  maneuver/fire  units  and  movement  of  critical 
supplies  [Ref.  2]. 

The  concentration  of  forces  and  weapons  at  the  critical 
time  and  place  is  a  prerequisite  for  winning  both  offensive 
and  defensive  battles.  The  firepower  and  cross-country 
mobility  offered  by  tanks  make  them  the  most  important 
conventional  battlefield  weapon  of  today  and  the  future. 
The  overall  mobility  of  the  forces  may  be  countered  through 
the  use  of  existing  and  reinforcing  obstacles.  Existing 
obstacles  may  be  considered  to  be  those  natural  or  man  made 
obstacles  which  currently  exist  on  the  battlefield. 
Reinforcing  obstacles  are  specifically  designed  to  Impede 
the  movement  of  enemy  units  and  are  constructed  when 
possible  to  complement  existing  obstacles,  friendly  fires, 
and  scheme  of  maneuver. 

Obstacles  are  Intended  to  be  employed  in  depth  along 
the  expected  enemy  axis  of  advance  with  the  intent  of 
stopping,  delaying,  or  redirecting  enemy  tanks  to  a 
location  advantageous  to  the  employment  of  anti-tank 
weapons.  If  the  obstacles  are  properly  employed  they  are 
likely  to  delay  an  enemy  unit  attempting  to  pass  through 
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them.  A  delay  that  occurs  within  the  range  of  anti-tank 
weapons  covering  the  obstacles  Is  likely  to  significantly 
Increase  the  effectiveness  of  those  antitank  weapons.  The 
primary  purpose  of  obstacles  Is  to  enhance  the 
effectiveness  of  friendly  fires,  to  delay  or  disrupt  enemy 
formations,  to  allow  the  tactical  commander  to  use  economy 
of  force,  and  to  enable  him  to  protect  his  flanks. 

The  Soviet  Army  places  great  emphasis  on  landmine 
warfare,  and  they  possess  rapid  and  effective  means  of  both 
laying  and  breaching  minefields.  They  are  likely  to  use 
mines  extensively  In  defensive  and  offensive  operations. 
By  doctrine,  their  minefields  are  located  at  the  front  of 
defensive  positions  and  are  covered  by  antitank  and  general 
supporting  fires.  Soviet  minefields  are  employed  to 
disrupt  the  enemy  attack  by  causing  vehicle  casualties, 
reducing  overall  momentum  of  the  attack,  and  forcing  the 
enemy  into  confined  areas.  Minefields  located  within  the 
main  area  of  defense  are  employed  to  provide  kill  zones  for 
anti-tank  weapons  and  restrict  enemy  movement  to  designated 
areas  where  the  concentrated  fires  of  all  weapons  are 
focused  on  the  attacking  forces.  They  are  not  used  with 
the  Idea  of  blocking  or  destroying  the  enemy  force,  but  to 
reinforce  natural  obstacles,  scare  the  enemy,  divert  his 
attention  from  the  defender  and  Influence  his  maneuver. 
[Ref.  3] 
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Mines  are  widely  recognized  as  the  most  effective 
reinforcing  obstacle.  While  other  obstacles  can  only  act 
passively  on  tanks,  mines  have  proven  themselves  to  be 
capable  of  destroying  tanks  by  themselves.  The  achievement 
during  the  combined  employment  of  anti-tank  weapons  and 
anti-tank  mines  of  a  greater  number  of  casualties  than 
would  be  possible  by  summing  the  casualty  producing 
capabilities  of  each  acting  Independently  Is  commonly 
acknowledged  and  Is  referred  to  as  a  synergistic  effect. 

To  counter  this  threat  of  decreased  mobility,  tank 
mounted  countermine  sets  of  plows  and  rollers  will  give  a 
tank  company  limited  capability  to  conduct  hasty  minefield 
breaches.  The  countermine  mix  must  provide  accurate 
Identification  of  minefield  encounters,  provide  effective 
mine  neutralization  In  the  breached  lanes,  provide  lanes 
for  the  assault  force  with  minimum  loss  of  momentum  and 
time,  and  minimize  breaching  and  assault  forces  losses  due 
to  mine  detonations  [Ref.  4]. 

The  roller /plow  team  has  distinct  limitations.  The 
roller,  by  virtue  of  the  fact  that  It  always  travels  In 
contact  with  the  ground.  Is  constantly  detecting  and 
clearing  a  path  Immediately  In  front  of  the  vehicle  on 
which  It  Is  mounted  [Ref.  4].  However,  due  to  the  weight 
of  the  device,  the  breaching  vehicle's  mobility  Is  greatly 
reduced.  Additionally,  due  to  the  roller's  method  of 
neutralizing  mines  by  detonation.  It  cannot  withstand  the 
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rigors  of  constant  breaching  operations.  The  mine  plows 
are  not  designed  to  detect  mines  but  to  clear  a  path 
directly  In  front  of  the  plow  tank  once  a  minefield  Is 
encountered/  detected.  Since  the  plow  tank  travels  with 
the  plow  In  the  raised  mode,  the  crew  of  the  plow  tank  must 
be  able  to  visually  detect  the  minefield  In  order  to 
determine  when  to  employ  the  plow  [Ref.  4] . 

B.  TACTICAL  RESPONSES  TO  MINEFIELDS 

The  offensive  force  commander  must  keep  one  principle 
In  mind  when  a  minefield  Is  encountered:  maintain  the 
momentum  of  the  offense.  Obstacles  must  not  stop  or  Impede 
the  movement  for  unusually  long  periods  of  time.  The 
tactical  commander  has  three  alternatives  when  faced  by  an 
obstacle;  he  may  breach,  bypass,  or  "force  through"  the 
obstacle  [Ref.  5]. 

1.  The  Bypass 

To  conserve  time  and  manpower,  obstacles  are 
bypassed  whenever  possible.  However,  If  the  enemy  has 
employed  the  obstacles  properly,  they  will  be  difficult  to 
bypass.  [Ref.  6] 

2.  The  Breach 

A  breach  Is  conducted  when  the  unit  possesses  the 
proper  equipment  to  breach.  Two  methods  of  breaching  may 
be  employed:  the  assault  breach  or  the  deliberate  breach. 
[Ref.  6]  We  are  concerned  only  with  the  assault  breach. 


The  assault/hasty  breach  Is  done  quickly  during  either  a 


hasty  or  deliberate  attack.  The  main  objective  is  speed  in 
gaining  the  breach,  since  delays  may  be  costly  in  terms  of 
casualties  due  to  direct  fires  covering  the  obstacle.  With 
the  mlneplow  and  mlneroller,  it  maybe  quicker  and  easier  to 
attempt  a  breach  than  to  bypass. 

3.  The  Force  Through 

The  "force  through"  or  "bull"  tactic  is  attempted 
when  no  other  way  to  overcome  the  obstacle  exists.  The 
unit  does  not  possess  any  breaching  equipment  and  will 
drive  through  the  minefield  in  hopes  of  clearing  a  path. 
Heavy  losses  are  expected  when  this  tactic  is  employed. 
[Ref.  7] 

C.  TYPES  OF  BREACHING  EQUIPMENT 

The  track  width  mine  roller  (TRMR)  is  a  10  ton  assembly 
consisting  of  two  banks  of  rollers.  The  rollers  detect 
mines  by  detonating  them  as  it  rolls  over  them.  There  is  a 
dog  bone  and  chain  assembly  between  the  two  banks  of 
rollers  to  activate  any  tilt  rod  mines  which  could  cause  a 
belly  kill  on  the  breaching  vehicle.  [Ref.  6]  Mine  rollers 
have  the  potential  to  provide  countermine  detection  and 
neutralization  only  as  long  as  the  single  impulse  pressure 
fuze  mine  remains  the  predominant  fuze  type.  [Ref.  8] 

The  track  width  mine  plow  (TRMP)  weighs  3.5  tons  and 
consists  of  two  plow  blades.  The  plow  removes  surface  laid 
or  buried  mines  from  the  path  of  the  vehicle's  tracks,  the 
tines  penetrate  the  ground  to  dislodge  burled  mines  and 
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bring  them  to  the  surface  where  they  are  cast  aside.  A  dog 
bone  and  chain  assembly  Is  used  to  clear  tilt  rod  mines  In 
the  same  manner  as  the  TWMR.  [Ref.  9]  It  possesses  the 
potential  to  provide  effective  mine  clearing  of  surface 
laid  mines  and  under  certain  terrain  conditions,  mines  laid 
below  the  surface  [Ref.  8]. 

Sweeping  operations  to  clear  a  path  through  a  minefield 
Is  carried  out  by  the  roller  and  plow  sections 
simultaneously  or  by  the  roller  section  alone.  When  moving 
through  a  mined  area,  travel  should  be  In  as  straight  a 
line  as  possible  and  no  sharp  turns  should  be  executed, 
otherwise  a  mine  unearthed  by  the  plow  may  pass  under  the 
tank's  tracks.  When  choosing  a  movement  route.  It  Is 
desirable  that  this  path  lie  along  the  smoothest  possible 
course  through  the  minefield.  [Ref.  10]  The  best  overall 
results  are  normally  achieved  when  the  two  systems  are  used 
In  tandem,  with  the  roller  leading  until  It  detects 
(detonates)  a  mine.  The  plow  then  digs  In  and  leads 
through  the  minefield,  followed  by  the  roller  which  proofs 
the  lane.  Once  the  minefield  Is  passed.  If  further  mines 
are  anticipated,  the  roller  resumes  the  lead.  [Ref.  11] 
The  company/team  sized  element  conducting  the  hasty  breach 
through  a  threat  minefield  and  continuing  on  to  seize  the 
objective  can  effectively  exert  command  and  control  of  only 
one  breach.  [Ref.  4] 
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D.  MEASURES  OF  EFFECTIVENESS 


The  measures  of  effectiveness  concentrate  on  the 
principal  purposes  of  countermine  equipment  which  are  to 
decrease  the  amount  of  time  the  unit  Is  exposed  In  the 
attack,  reduce  delay  time  due  to  minefields,  and  to  change 
the  force  ratio  for  the  attackers.  The  MOEs  are 
quantitative  Indicators  of  the  equipment's  ability  to 
affect  the  battle  outcome  compared  to  various  base  case 
situations,  (l.e.  when  the  battlefield  Is  void  of  obstacles 
and  the  battle  outcome  when  the  battlefield  has  minefields 
and  the  attacking  unit  does  not  possess  any 
breaching/clearing  equipment ) . 

An  Integral  factor  in  the  determination  of  the  number 
of  breaching  systems  is  the  vulnerability  of  a  specific 
device  to  direct  or  indirect  fires,  since  the  loss  of  a 
device  (due  to  damage  or  failure)  before  or  during  the 
breach  would  require  the  employment  of  additional  devices. 
Because  of  their  relatively  high  degree  of  accuracy  and 
standard  coordinated  employment  with  a  minefield,  direct 
fires  are  generally  considered  to  be  the  predominant 
■  threat . 

The  final  factor  that  must  be  considered  in  the  MOE 
development  is  the  expected  reliability  and  survivability 
of  the  clearing  or  neutralizing  device.  This  reliability 
denotes  the  probability  of  the  device  actually  clearing  or 
neutralizing  a  mine  it  encounters  and  the  survivability  of 
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the  device  is  the  ability  to  withstand  the  rigors  of  mine 
detonations  which  may  be  encountered  when  clearing  the 
obstacle. 

The  primary  question  of  how  the  number  of  pieces  of 
breaching  equipment  affects  the  battle  is  best  answered  by 
measuring  the  number  of  casualties  suffered  by  the 
attacking  force.  If  the  equipment  accomplishes  its 
mission,  such  as  allowing  a  rapid  breaching  of  obstacles, 
there  should  be  a  decrease  in  the  number  of  casualties  due 
to  both  mine  detonations  and  direct  fire  kills,  or  the 
minimum  range  between  opposing  forces  should  have 
decreased. 

The  MOEs  are  as  follows: 

1.  percent  of  blue  casualties  due  to  direct  fire. 

2.  percent  of  blue  casualties  due  to  mine  detonations 

3.  percent  of  blue  casualties  due  to  both  mine 
detonations  and  direct  fire. 

4.  number  of  blue  casualties  due  to  mines/number  of 

pieces  of  breaching  equipment  available. 

5.  number  of  blue  casualties  due  to  direct  fire/number 
of  pieces  of  breaching  equipment  available. 

6.  number  of  total  blue  casualties/number  of  pieces  of 
breaching  equipment  available. 

7.  Number  units  going  to  defensive  posture  over  50 

repetitions  of  the  model. 

8.  Time  of  units  going  to  defensive  posture  (number  in 
the  initial,  early,  middle  and  late  portions  of  the 
battle ) . 

9.  Average  length  of  battle. 

10.  Minimum  range  of  blue  forces 
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11.  Rate  of  battle  losses  =  number  of  casualtles/mlnute 
of  battle. 
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III.  MODEL  DEVELOPMENT 


The  model  developed  for  this  thesis  Is  a  time 
sequenced,  stochastic,  battalion  level,  force-on-force 
simulation.  The  model  conducts  the  battle  In  uniform  time 
steps  of  30  seconds  each.  Figure  2  provides  the  general 
scheme  for  the  sequence  and  flow  of  events  In  the  model . 
The  pertinent  elements  for  the  landmine  simulation  and 
analysis  problem  are  the  mine  countermeasures  equipment  and 
the  maneuver  units.  Other  necessary  values  are  the  mine 
countermeasures  equipment  at  the  assault  site  and  the 
characteristics  of  the  equipment. 

The  simulation  has  been  written  to  allow  for  maximum 
user  flexibility  while  maintaining  a  simple  and  transparent 
structure.  Unit  formations  can  be  easily  changed,  numbers 
and  types  of  equipment  are  easily  modified,  and  even  the 
maneuver  network  can  be  easily  changed.  The  full 
flexibility  of  the  model  Is  discussed  In  detail  as  each 
module  Is  explored.  Although  the  program  code  Is  listed  In 
Its  entirety  In  Appendix  B,  the  critical  portions  are 
discussed  In  the  following  sections. 

The  sequence  of  events  for  each  time  Interval  ( 30 
seconds)  contains  six  main  phases:  unit  status,  unit 

location,  movement.  Red  detect/fire.  Blue  detect/fire  and 
battle  termlnatlon/results.  The  movement  phase  applies  to 
the  blue  forces  only.  Generally,  every  blue  unit  Is 

advanced  the  total  distance  It  Is  able  to  travel  based  on 
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Figure  2.  Model  Flowchart 


unit  formation,  types  of  equipment,  terrain  and  location. 
The  detection  for  both  the  red  and  blue  forces  is  similar 
in  that  the  time  to  detect  is  fixed  at  a  given  interval  of 
thirty  seconds.  If  it  takes  longer  than  30  seconds  to 
detect  an  opposing  element,  then  that  element  is  not 
detected.  This  concept  is  explored  in  more  detail  later  in 
the  chapter.  The  detection  modules  also  serve  to  allocate 
the  unit's  fire,  assigning  targets  to  those  elements  who 
have  detected  them.  The  fire  module  is  stochastically 
based,  using  probabilities  of  hit  and  kill  given  hit  in  a 
Monte  Carlo  model  to  determine  the  outcome  of  an 
engagement.  If  a  hit  on  a  target  does  occur,  the  model 
determines  either  a  kill  or  no/unimportant  damage  to  the 
vehicle.  Once  a  vehicle  has  been  killed  it  is  removed  from 
the  simulation,  no  longer  able  to  either  provide  additional 
maneuver  or  firs,  nor  can  it  be  detected  by  the  opposing 
forces . 

Within  the  movement  phase  is  the  minefield  logic.  The 
module  deals  with  a  minefield  in  two  phases,  that  of 
actions  taken  upon  entry  into  a  m^-aefield  and  casualties 
due  to  entry,  and  actions  taken  during  the  breaching  or 
bypassing  of  the  minefield.  The  determination  of  whether  a 
mine  detonation  occurs,  the  exact  location  of  the 
detonation  and  the  damage  incurred  is  a  function  of  the 
density  of  mines  in  the  field,  the  effective  vehicle  width 
and  the  actual  distance  traveled  in  the  minefield. 

Knowledge  about  the  specific  location  of  a  minefield  is 
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gained  in  one  of  two  ways,  either  by  visual  detection  of 
the  minefield  prior  to  entry  or  by  detonation  of  a  mine 
after  entry.  Options  based  on  minefield  knowledge  are 
discussed  In  a  subsequent  section.  The  mines  are 
considered  to  be  either  surface  laid  or  burled.  Two 
minefields  are  modelled  In  the  simulation,  one  emplaced  far 
(approximately  3000  meters)  from  the  objective  and  one 
emplaced  near  (approximately  1500  meters)  the  objective. 
The  probability  of  detection  for  the  far  minefield  is  low 
due  to  the  assumption  of  no  reinforcing  obstacles  or 
readily  Identifiable  boundaries.  The  near  minefield's 
detection  probability  Is  set  higher  due  to  the  likelihood 
of  reinforcing  the  field  with  wire  obstacles.  The 
detection  probabilities  are,  however.  Input  data  and  may  be 
changed  to  conduct  additional  analysis.  Battle  termination 
stops  the  simulation  when  either  of  the  following  criteria 
Is  met: 

1 .  Red  force  strength  falls  below  25  percent 

2.  The  minimum  range  between  forces  is  less  than  250 
meters. 

There  are  no  battle  termination  criteria  used  for  the  blue 
force  other  than  If  a  company's  strength  falls  below  50 
percent.  It  assumes  a  defensive  posture. 

In  addition  to  the  main  simulation  discussed  above,  an 
enhanced  simulation  was  developed  based  on  the  concept  of 

A 

limited  command,  control,  and  communications  (C-)  versus 

total  C^.  The  only  control  in  the  initial  model  is  to 
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insure  an  alignment  of  forces  with  respect  to  the  range  to 
the  enemy. 

In  the  enhanced  model,  in  addition  to  the  alignment  of 
forces,  the  presence  of  minefields  in  the  area  of 
operations  is  communicated  to  the  rest  of  the  battalion 
after  initial  detonation  or  detection  of  the  first 
minefield  by  the  lead  unit.  This  concept  is  discussed  in 
detail  in  the  minefield  logic  section  of  this  chapter  and 
is  the  only  modification  to  the  initial  model.  All  other 
subroutines  function  the  same  in  both  models. 

A.  TACTICAL  SCENARIO 

The  scenario  used  in  the  model  is  based  in  West  Germany 
on  terrain  similar  to  that  found  near  the  Fulda  Gap.  The 
NATO  forces  have  assumed  an  offensive  posture  and  the  3rd 
Battalion,  35th  Armor  is  to  conduct  a  deliberate  attack  to 
secure  near  side  crossing  sites  on  the  Ulster  River  on  the 
East-West  German  border.  Although  enemy  forces  in  the  area 
have  been  weakened  by  the  past  days  of  fighting,  front  line 
troops  are  in  prepared  defensive  positions  protecting  the 
crossing  sites.  The  enemy  is  believed  to  be  in  an  economy 
of  force  posture  and  has  used  reinforcing  obstacles  to 
strengthen  its  position.  Reconnaissance  by  the  Scout 
Platoon  has  been  unable  to  provide  enough  Information  about 
possible  minefields  or  gaps  in  the  defending  system, 
therefore  the  decision  has  been  made  to  breach  into  and 
through  the  defending  system  in  all  cases  except  when 
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breaching  assets  are  not  available.  The  enemy  force  Is 
believed  to  consist  of  a  tank  company  of  T-72s  reinforced 
by  a  platoon  of  BMPs  occupying  prepared  defensive  positions 
( Figure  3 ) . 


OPERATION  OVERLAY 


A  quick  attack  is  to  be  made  by  3-35  Armor  along  twin 
axis  of  advance  with  selected  limited  objectives  (Figure 
3).  The  battalion  will  attack  with  two  companies  abreast 
on  each  of  the  two  axis  to  secure  the  high  ground  on  the 

I  objective  currently  held  by  the  red  forces. 

i 

1 

B.  INITIALIZATION  AND  DATA  INPUT 

There  are  fourteen  data  files  which  provide  support  to 
the  simulation.  These  files  support  the  movement  network, 
the  detectlon/flre  modules,  and  the  unit  formation  and 
breaching  routines  and  are  listed  in  Appendix  C. 

Data  files  1  through  4  support  the  movement  network  by 
providing  arc  and  node  designators,  locations  of  nodes, 
distances  and  headings  of  the  arcs,  speeds  that  the  unit 
can  maintained  based  upon  terrain,  equipment  and  formation, 
and  the  axis  of  advance  for  each  of  the  four  maneuver 
units. 

Data  files  8  through  11  delineate  the  four  possible 
formations  the  blue  forces  are  able  to  use  in  the  conduct 
of  the  attack.  Figure  4  shows  the  four  formations. 
Formation  configuration  and  vehicle  placement  are  changed 
simply  by  changing  the  x  and  y  offset  positions  from  the 
control  or  ghost  vehicle.  The  purpose  of  the  control 
vehicle  is  described  in  the  movement  module. 

In  both  versions  of  the  model,  formation  0  is  used  when 
a  unit  assumes  a  defensive  posture;  formation  2  is  the 
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formation  used  during  the  breach  or  bypass  of  an  obstacle. 
Formation  1  is  the  movement /assault  formation  used  by  the 
unit  at  all  other  times  in  model  1.  In  the  enhanced  model 
formation  1  is  used  by  all  units  until  the  first  minefield 
is  detected/detonated.  Formation  3  is  then  assumed  as  the 
standard  movement/assault  formation  at  all  times  except 
when  the  use  of  formation  0  or  2  is  invoked. 

There  are  five  vehicle  type  codes  used  in  the 
simulation.  Vehtypel  is  the  designator  for  a  basic  Ml. 
Vehtype2  is  for  a  mineplow  tank  with  the  plow  in  the  raised 
position.  Vehtype4  is  the  designator  for  the  same  type  of 
vehicle,  with  the  plow  in  the  lowered  or  deployed  position. 
VehtypeS  and  VehtypeS  are  used  in  the  same  fashion  for  the 
mineroller  tank,  3  being  used  to  designate  the  roller  in 
the  raised  position  and  5  to  designate  the  roller  in  the 
deployed  position.  Both  the  mineroller  tank  and  the 
mineplow  tank  can  become  a  regular  Ml  tank  if  the  breaching 
attachment  is  destroyed  during  conduct  of  the  battle. 
Therefore  it  is  possible  to  begin  the  battle  with  10  tanks, 
2  mineplow  tanks  and  2  mineroller  tanks  and  end  the  battle 
with  14  regular  tanks,  if  all  the  attachments  were 
destroyed  during  breaching  operations. 

Data  file  14  places  the  blue  elements  in  specific 
positions  outlined  in  the  various  formations  (Figure  4). 
For  example,  if  a  unit  consisted  of  14  vehicles  (10  tanks, 
1  mineroller  tank  and  3  mineplow  tanks)  the  entry  order  of 


22 


UETDtSxlOO 


UHEKSkIOO 


roiUMTION  2 


I4l]llllie  (67IS4321 


-I  ..i - 1_  1  1  I  I  1  I 

-«  -4  -a  0  a 

McrotSKioo 


FORMATION  2 


t 


-•  -*  -4  -a 

uerERSxioo 


Figure  4.  Unit  Formations 


the  vehtype  code  into  data  file  14  is  the  position  they 
would  occupy  in  each  of  the  formations.  Therefore  if  the 
mineroller  tank  is  entered  first  as  vehicle  type  3  in  the 
file,  it  would  occupy  the  number  1  position  in  each  of  the 
various  formations,  a  mlneplow  tank  entered  second  as 
vehicle  type  2  in  the  file  would  occupy  the  number  2 
position  in  all  formations,  etc.  This  obviously  allows  the 
configuration,  in  terms  of  niimbers  and  types  of  equipment, 
of  each  unit  Independently  as  well  as  allowing  each  unit  to 
place  that  equipment  wherever  it  wishes  within  each  of  the 
formations.  The  only  restriction  regarding  unit  size  is 
that  they  all  must  have  the  same  number  of  total  vehicles 
and  that  ntunber  cannot  exceed  20  vehicles  without  changing 
the  dimensions  in  the  program.  For  example,  one  unit  could 
have  all  tanks  while  another  could  have  10  tanks,  3 
mineroller  tanks  and  1  mlneplow  tank. 

The  only  vehicle  type  codes  that  are  entered  by  the 
user  are  one,  two,  or  three.  The  program  will 
automatically  change  vehicle  type  2  and  3  to  4  and  5 
appropriately  during  breaching  operations,  changing  them 
back  to  vehicle  type  2  and  3  once  the  breaching  operation 
in  that  particular  unit  has  been  completed. 

Data  files  12,  13,  15  and  16  support  the  red  forces  in 
such  areas  as  position  (file  12),  the  probability  of 
looking  in  a  particular  direction  (file  13),  the  vehicle 
type,  height,  and  maximum  engagement  ranges  (file  15)  and 
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finally  the  probabilities  of  hitting  a  target  and  killing 
the  target  given  a  hit,  which  obviously  support  the 
detection  and  fire  modules.  Data  file  17  provides  the 
probabilities  of  hit  and  kill  for  the  blue  forces  in  the 
same  manner  as  file  16  for  the  red  forces. 

In  addition  to  the  data  files,  there  are  several 
initial  data  statements  in  the  program  which  support  the 
minefield  setup  module  with  minefield  depths,  densities, 
and  probabilities  of  occurrence,  all  of  which  may  easily  be 
changed  by  the  user. 

C.  MINEFIELD  SETUP  MODULE 

The  anti-vehicular  minefield  is  represented  in  the 
simulation  as  a  uniform  distribution  of  mines  which  are 
randomly  dispersed  within  the  minefield.  The  minefields 
are  modeled  as  continuous  with  the  depths  ranging  from  150 
to  300  meters  for  the  minefields  located  at  approximately 
3000  meters  from  the  enemy  position  and  200  to  300  meters 
for  the  minefields  located  approximately  1500  meters  in 
front  of  the  red  force  position.  The  minefield  densities 
are  expressed  in  terms  of  mines  per  square  meter  rather 
than  the  standard  mines  per  meter  of  frontage. 

Because  the  fields  in  this  simulation  have  only  a  depth 
associated  with  them,  this  unit  of  measure  for  density  is 
preferred.  The  density  of  the  far  field  is  .003  mines  per 
square  meter  and  the  density  of  the  near  field  is  .02  mines 
per  square  meter.  The  densities  and  depths  of  the 


minefields  can  be  easily  changed  by  changing  the  data 
statements  at  the  beginning  of  the  simulation.  By  setting 
the  maximum  and  mlnlmtun  depths  of  the  minefields  equal,  all 
fields  will  be  of  the  same  depth.  The  depth  of  each 
minefield  Is  determined  by  a  uniform  (0,1)  random  draw 
which  then  determines  the  field  dimension  by 

Depth  of  Minefield 

=mlndepth  +  ( (maxdepth-mlndepth)*U(0, 1 ) )  /  1000 
(equation  3.1) 

The  basic  concept  of  the  minefield  effects  calculation 
Is  that  of  the  expected  distance  to  a  mine  encounter. 
Since  the  mines  are  randomly  placed,  the  expected  distance 
to  the  Initial  encounter  and  then  each  succeeding  encounter 
Is  exponentially  distributed.  Therefore  the  expected 
distance  to  a  mine  encounter  given  by  equation  3.2. 

E[dlstance  to  encounter] =ln( 1-U(0, 1 ))/( -wldth*denslty) 

( equation  3.2) 

where  the  width  Is  the  effective  width  of  the  vehicle 
encountering  the  mine  and  the  density  Is  the  density  of  the 
minefield  In  which  the  encounter  Is  taking  place. 
Successive  distances  to  each  encounter  are  thus  calculated 
prior  to  the  commencement  of  the  simulation  and  are  stored 
for  future  use. 

One  other  feature  which  Is  Included  In  the  Minefield 
Setup  module  Is  the  probability  that  a  particular  minefield 
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Is  actually  emplaced.  In  the  simulation,  runs  were 
evaluated  under  a  worse  case  scenario  and  a  most  likely  or 
average  case  scenario.  The  most  likely  or  average  case 
scenario  used  a  70  percent  chance  of  each  of  the  far 
minefields  being  In  place  and  a  90  percent  chance  of  each 
of  the  near  minefields  being  In  place.  Therefore  the 
possibly  exists  on  any  single  run  for  anywhere  from  zero  to 
eight  minefields  to  be  In  place  facing  the  blue  force,  and 
on  any  single  avenue  from  zero  to  two  minefields  to  be  In 
place,  based  on  the  random  number  draws.  By  emplacing  the 
minefields  In  this  fashion  and  then  running  multiple 
repetitions  of  the  simulation,  a  long  run  average  minefield 
emplacemen-*-  will  be  achieved  providing  a  greater  degree  of 
variebi i ity  In  the  evaluation  of  the  likelihood  of  success 
of  a  particular  unit  configuration. 

D.  UNIT  STATUS  MODULE 

The  unit  status  module  serves  to  keep  a  running  total 
on  the  losses  of  equipment  by  unit  and  type.  It  is  in  this 
routine  that  the  determination  of  whether  a  unit  goes  to  a 
defensive  posture  Is  made.  If  the  unit  Is  less  than  50 
percent  effective  (l.e.,  it  has  lost  over  half  of  its 
equipment),  then  It  assumes  a  defensive  posture,  thereby 
decreasing  the  likelihood  of  acquisition  by  moving  to  a 
hull  down  position.  This  aspect  will  be  discussed  in  more 
detail  In  the  Red  Detect  module.  When  a  unit  goes  to  a 
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stationary  defensive  posture,  there  Is  no  Impact  on  the 
speeds  of  the  remaining  units. 

E.  UNIT  LOCATION  MODULE 

The  unit  location  module  exerts  command  and  control 
over  the  battalion  by  delaying  units  which  are  moving  too 
fast.  The  ranges  to  the  enemy  force  of  all  four  blue  units 
will  be  In  the  Interval  [rngmln,rngmax]  where  the  two 
limits  are  determined  by  the  unit  closest  to  the  enemy 
force  (rngmin)  and  the  unit  farthest  from  the  enemy  force 
( rngmax ) . 

The  module  computes  the  range  to  the  objective  of  each 
unit.  If  the  range  difference  between  all  the  units  Is 
less  than  500  meters,  then  all  units  proceed  at  the  maximum 
speed  possible  as  determined  by  terrain  and  equipment  in 
each  unit.  However,  If  the  range  difference  between  the 
closest  and  farthest  units  is  greater  than  500  meters,  then 
the  speed  of  the  closest  unit  Is  adjusted  downward  by  a  lag 
factor,  AAA.  The  factor  AAA  is  computed  by  equation  3.3: 

AAA= ( rngmax- rngmin ) / 1 ag 
(equation  3.3) 

.where  lag  Is  the  maximum  distance  allowed  between  the 
closest  and  farthest  units:  in  this  case,  500  meters.  This 
value  Is  then  passed  to  the  movement  module  where  It  Is 
used  to  decrease  the  speed  of  the  leading  unit.  As  an 
example,  if  the  range  of  the  closest  unit  is  2.4  kilometers 


28 


and  that  of  the  farthest  unit  is  3.2  kilometers,  then  the 
value  of  AAA  would  be: 

AAA  =  (3. 2-2. 4)/. 5  =  1.6 

This  value  is  then  used  to  decrease  the  speed  of  the 
leading  unit  by  a  factor  of  1.6.  Thus  for  a  speed  of  25 
kilometers  per  hour  decreased  by  an  AAA  of  1.6,  the  new 
speed  of  the  unit  would  be  15.625  kilometers  per  hour. 

F.  MOVEMENT  MODULE 

The  movement  logic  Is  first  discussed  In  detail  without 
the  minefield  modules  Included.  Minefield  tactics  and  how 
they  Impact  on  the  movement  routine  are  discussed  in  the 
following  section.  The  Movement  module  Is  made  up  of  three 
distinct  routines;  a  determination  of  unit  speed,  location 
and  distance  traveled  along  an  arc,  and  the  location  of 
each  of  the  elements  in  the  unit  in  x  and  y  coordinates 
( Figure  5 ) . 

Unit  movement  consists  of  moving  each  unit  along  a 
network  of  arcs,  each  of  which  has  a  distance,  heading  and 
speed  associated  with  it.  The  network  used  to  support  this 
simulation  is  shown  in  Figure  6.  A  unit  starts  at  the  tall 
node  of  the  arc,  moving  as  far  as  possible  in  the  30  second 
time  interval,  based  on  the  allowable  speed  associated  with 
that  particular  arc  and  the  type  of  equipment  in  the  unit. 
For  each  30  ;  .jcond  time  step  the  following  process  is 
followed  for  each  unit  in  the  Movement  module.  On  entry 
into  the  subroutine  the  first  decision  is  whether  or  not 
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Figure  5.  Movement  Flowchart 


the  unit  is  in  a  defensive  posture.  If  it  is,  then  the 
unit  speed  is  set  to  zero  and  the  logic  loops  to  the 
offset  routine  where  the  x,y  position  of  each  element  is 
determined. 


Figure  6.  Network  Supporting  Movement  Routine 

If  the  unit  is  still  combat  effective  the  Speed 
subroutine  is  entered  to  determine  the  unit ' s  speed  and 
travel.  The  first  step  is  to  determine  the  maximum  speed  a 
unit  can  maintain  on  a  given  arc  based  on  equipment  in  the 
unit  and  terrain  characteristics  for  that  arc.  The 
traf ficability  and  slope  of  the  terrain  are  taken  into 
account  by  degradation  of  the  unit  speed  as  shown  in  the 
Speed  file  (Appendix  C). 

If  the  unit  has  a  mineroller  tank,  then  that  vehicle  is 
the  limiting  speed  factor  unless  the  unit  also  has  mineplow 
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tank  which  is  currently  being  employed,  in  which  case  that 
vehicle  is  the  limiting  speed  factor.  The  speed  of  a  unit 
may  vary  on  a  single  arc  as  the  unit's  equipment  changes 
configuration  or  is  attritted.  Once  the  speed  of  the  unit 
is  determined,  if  it  is  the  unit  closest  to  the  enemy  and 
the  lag  factor,  AAA,  is  greater  than  1,  then  the  speed  is 
decreased  accordingly.  Once  the  final  speed  for  the  time 
step  is  determined,  the  travel  for  the  thirty  second 
interval  is  determined  and  control  returns  to  the  Movement 
module. 

The  ghost  vehicle  is  the  only  vehicle  that  is  actually 
moved  and  controlled  by  the  model.  Once  the  speed  and 
travel  of  the  unit  is  determined,  the  ghost  vehicle  is 
moved  to  a  new  set  of  x,y  coordinates  along  the  arc.  Then, 
depending  on  the  current  formation  of  the  unit,  the 
elements  are  positioned  by  the  Offset  subroutine.  The  new 
positions  are  determined  by  the  x  and  y  offset  distances 
obtained  from  the  appropriate  formation  data  file  and  are 
adjusted  depending  on  the  current  heading  of  the  ghost 
vehicle  along  the  arc  (Figure  7). 

As  an  example,  an  element  that  is  offset  (-1.0, 1.0)  is 
100  meters  up  and  100  meters  behind  the  ghost  vehicle.  If 
the  current  position  of  the  ghost  vehicle  is  (483,621)  and 
it's  heading  is  due  east  then  the  element  is  located  at 
(482,622).  If,  however,  the  ghost  vehicle  was  at  the  same 


location  but  heading  northeast  (45  degrees  from  the  x 
axis),  then  the  location  of  the  element  is  (483.0,619.6). 


DETERMINATION  OF  ELEMENT  X,Y  COORDINATES 


Figure  7.  Determination  of  Element  X,Y  Coordinates 

When  the  unit  reaches  the  end  of  an  arc,  the  unit 
assumes  the  new  heading  and  speed  associated  with  the  next 
arc  in  the  network.  In  this  fashion,  all  units  are  able  to 
move  independently  over  any  network  which  may  be  developed 
to  support  the  scheme  of  maneuver. 
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G.  MINEFIELD  LOGIC 

Once  the  Movement  routine  was  developed,  it  was  a 
simple  matter  to  construct  and  insert  the  minefield  logic 
which  is  the  heart  of  the  simulation.  The  minefield  logic, 
like  the  rest  of  the  simulation,  is  flexible  in  nature, 
allowing  for  an  unlimited  number  of  configurations. 
Minefields  may  be  placed  on  any  arc  in  the  network,  the 
only  restrictions  being  that  the  arc  must  be  longer  than 
the  depth  of  the  minefield  and  only  two  minefields  per 
avenue  of  approach  may  be  input.  The  probability  of  a 
minefield  being  in  place,  the  density  of  the  minefield  and 
the  maximum  and  minimum  depths  are  all  input  by  the  user. 

The  minefield  logic  is  discussed  in  two  phases:  first 
the  actions  taken  on  entry  into  the  minefield,  and  second, 
the  actions  occurring  during  the  breach  of  the  minefield. 

H.  INITIAL  ENTRY  INTO  A  MINEFIELD 

A  decision  model  has  been  developed  which  represents 
the  process  by  which  a  unit  commander  selects  one  of  the 
three  possible  options  available  to  him  when  a  vehicle  in 
his  unit  detonates  a  mine  or  the  location  of  the  minefield 
is  detected  visually.  Figure  8  shows  the  general  sequence 
of  events  involved  in  the  minefield  detection  logic.  As 
discussed  earlier,  he  may  choose  to: 

1 .  conduct  a  hasty  breach  if  the  unit  possesses  any 
breaching  equipment; 
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2.  bypass  the  minefield  If  the  tactical  situation 
permits  or  he  does  not  possess  any  breaching 
equipment ;  or 

3.  order  a  "bull  through",  hoping  to  clear  a  lane 
without  sustaining  overwhelming  casualties. 

The  choice  the  commander  makes  In  the  simulation  Is 
based  on  the  knowledge  he  currently  possesses  about  the 
minefield.  Once  that  knowledge  about  a  particular 
minefield  Is  gained.  It  Is  assumed  to  be  perfect  knowledge 
In  regards  to  the  boundaries  of  the  minefield  and  the 
unit's  location  within  that  minefield.  If  the  knowledge 
about  the  minefield  Is  gained  prior  to  entering  the 
minefield,  then  the  model  will  elect  one  of  two  options; 
either  a  breaching  operation  if  the  unit  currently 
possesses  breaching  equipment,  or  a  bypass  if  it  does  not. 
The  breaching  operation  begins  at  the  edge  of  the  field  and 
distances  to  mine  encounters  are  retrieved  from  the  array 
previously  calculated  In  the  minefield  setup  module. 

If  the  knowledge  about  a  minefield  Is  gained  after 
entry,  it  is  gained  the  hard  way  by  detonation  of  a  mine. 
The  simulation  Is  able  to  react  in  one  of  three  ways.  If 
the  unit  possesses  any  breaching  equipment.  It  begins  a 
breaching  operation  from  the  point  where  the  mine 
detonation  took  place,  since  it  is  assumed  that  up  to  that 
point  the  minefield  has  been  successfully  breached.  If  the 
unit  does  not  possess  any  breaching  equipment,  the  decision 
to  "bull  through"  or  bypass  is  based  on  the  distance  into 
the  minefield  that  the  detonation  took  place,  thereby 
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assuming  perfect  knowledge  for  the  commander  on  the 
specific  boundaries  of  the  minefield  once  It  Is  Identified. 
If  the  detonation  occurred  less  than  half  way  through  the 
minefield,  the  unit  commander  elects  to  conduct  a  bypass 
operation.  If  the  unit  has  penetrated  more  than  half  way 
through  the  minefield  prior  to  the  first  detonation,  then 
the  unit  will  "bull  through"  the  minefield,  hoping  to 
minimize  losses  as  compared  with  attempting  to  back  out  and 
bypass  the  obstacle. 

In  all  cases,  regardless  of  the  option  chosen  by  the 
unit,  the  following  two  actions  occur.  The  unit  is 
assessed  a  thirty  second  delay  In  movement  while  changing 
formations  and  any  enemy  elements  which  have  been  detected 
by  the  unit  entering  the  minefield  are  lost.  Therefore,  If 
in  the  period  (t,t+30)  the  unit  had  detected  an  enemy 
element,  during  the  normal  sequence  of  events  that  element 
would  have  been  engaged  during  the  period  (t+30,t+60). 
However,  due  to  the  minefield  encounter  occurring  during 
the  period  (t+30,t+60),  all  detections  are  lost  and  all 
elements  in  the  unit  entering  the  minefield  must  reenter 
the  detection  module  during  the  period  (t+30,t+60). 
Additionally,  at  any  time  the  unit  is  in  a  breaching 
operation  all  vehicle  types  2  and  3,  which  are  now  coded  as 
4  and  5,  respectively,  cannot  conduct  direct  fire 
engagements.  This  restriction  occurs  because  the  crew  is 


occupied  with  the  conduct  of  the  breach  as  opposed  to 
trying  to  detect  the  enemy. 


I .  BREACHING  OPERATIONS 

If  a  minefield  has  been  entered,  the  breaching 
operation  commences.  Although  the  bypass  Is  not  really  a  j 

breach  of  the  obstacle.  It  does  allow  the  unit  to 
circumvent  the  minefield  and  continue  Its  mission. 

In  the  simulation  the  bypass  option  Is  dealt  with  | 

rather  simply.  Rather  than  building  additional  arcs  and 
nodes  as  a  bypass  route,  which  would  Invariably  restrict 
the  placement  of  minefields,  the  unit's  speed  Is  simply  | 

degraded  and  the  mine  detonation  routine  Is  suppressed.  In 
this  manner  the  unit  Is  subjected  to  enemy  fires  for  a 
longer  period  of  time  and  the  delay  In  forward  progress  j 

accurately  simulates  the  requirement  to  move  parallel  to 
the  minefield  In  hopes  of  discovering  a  route  around  the 
obstacle.  j 

A  similar  methodology  Is  used  for  the  "bulling  thru" 
technique.  The  unit.  In  It's  attempt  to  "bull  thru", 
maintains  a  single  column  formation,  thereby  reducing  the  I 

exposure  of  trailing  elements  to  mine  detonations. 

The  formation  the  unit  uses  while  breaching  the 
minefield  Is  specified  as  Input  to  the  model.  In  this  I 

simulation,  the  formation  used  In  all  breaching  operations 
Is  a  single  column  of  vehicles  with  all  the  breaching 
assets  at  the  head  of  the  column.  i 
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The  unit  will  conduct  the  breach  if  it  possesses  the 
requisite  assets.  The  simulation  places  all  the  breaching 
equipment  at  the  front  of  the  formation,  with  all  the 
mineplows  leading,  followed  by  the  minerollers,  then 
followed  by  the  remaining  vehicles  in  the  unit.  The  order 
that  the  vehicles  enter  and  breach  the  obstacle  is  user 
input  through  the  use  of  formation  2.  The  simulation  does 
allow  for  a  breaching  device  to  be  destroyed  without 
destroying  the  carrier  on  which  it  is  mounted.  If  a 
breaching  device  does  become  inoperable,  then  that 
vehicle's  type  code  is  changed  to  a  1  (Ml  tank)  and  it  is 
cycled  to  the  rear  of  the  formation.  In  this  fashion,  a 
vehicle  with  no  breaching  device  does  not  lead  the  breach 
(unless  there  are  no  more  breaching  assets  in  the  unit). 

The  simulation  will  allow  any  of  the  following  cases  to 
occur  depending  on  the  random  draw. 

1.  A  clearing  device  may  be  destroyed. 

2.  The  carrier  of  a  breaching  device  may  be  destroyed. 

3.  A  mine  may  be  left  uncleared. 

In  case  3  a  following  vehicle  may  clear  the  mine  if  it  has 
a  breaching  device,  or  it  may  detonate  the  mine  and  be 
killed. 

In  the  breaching  logic,  mine  encounters  by  each  type  of 
vehicle  are  dealt  with  in  the  following  manner.  If  a 
vehicle  type  1  encounters  a  mine,  a  random  draw  is 
conducted  to  determine  a  kill  or  no/unimportant  damage. 
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For  the  Ml,  all  mines  are  detonated  when  encountered  and 
none  are  left  uncleared  under  the  tracks. 

If  the  lead  vehicle  Is  a  mlneroller,  there  Is  a  two 
step  process  In  the  determination  of  the  probability  of 
clearing  and  surviving  the  mine  encounter.  Figure  9  shows 
the  process  for  the  clearing  of  mines  by  the  mlneroller 
tank.  When  a  mine  Is  encountered  there  exists  a 
probability  associated  with  the  clearing  of  the  mine  and, 
then  given  the  clearing  (by  detonation  with  the  rollers),  a 
probability  associated  with  surviving  the  blast. 

Although  the  operation  Is  similar  for  the  mlneplow,  a 
mine  encounter  Involves  a  three  step  process  to  determine 
the  outcome  of  an  encounter.  Figure  10  shows  the 
methodology  used  for  an  encounter  by  a  mlneplow  tank. 
There  Is 

1.  a  probability  associated  with  clearing  the  mine, 

2.  a  probability  of  detonation  given  the  plow  cleared 
the  mine  and  finally 

3.  a  probability  of  surviving,  given  the  detonation  by  a 
cleared  mine. 

If  a  unit  has  breaching  assets,  then  It  conducts  a 
breach.  However,  after  losing  Its  last  piece  of  breaching 
equipment  the  decision  to  "bull  thru"  or  bypass  Is  the  same 
as  when  the  field  Is  first  encountered.  If  the  unit  has 
not  penetrated  at  least  halfway  through  the  minefield,  then 
It  conducts  a  bypass.  If  It  has  reached  the  halfway  mark. 


40 


Figure  9.  Mineroller  Breaching  Flowchart 


4 


STAR 


Figure  10.  Mineplow  Breaching  Flowchart 
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then  the  unit  will  "bull"  the  rest  of  the  way  through  the 
minefield. 

In  Model  1,  units  encounter  and  deal  with  each 
minefield  entirely  on  their  own.  There  is  no  communication 
between  units  regarding  the  encounter  of  a  minefield.  Each 
unit  stays  in  formation  1  until  they  either  detect  or 
detonate  a  minefield,  suffering  the  losses  associated  with 
each  encounter.  Once  the  field  is  cleared  the  unit  returns 
to  formation  1,  and  the  process  is  repeated  for  the  second 
minefield. 

With  Model  2,  communication  regarding  minefield 
locations  is  simulated.  When  the  lead  unit  encounters  the 
first  minefield,  all  the  other  units  in  the  battalion 
assume  a  detection  formation.  Formation  3  in  Figure  4  is 
used  for  this  purpose.  The  mineroller  tank  is  placed  in  the 
lead  in  hopes  of  detecting  the  location  of  the  minefield  on 
the  axis  of  advance  by  the  rollers  and  avoiding  vehicle 
losses  due  to  detonations.  Additionally,  when  the  unit 
exits  the  minefield,  it  resumes  formation  3,  as  opposed  to 
Model  1  where  the  unit  assumes  formation  1 . 

Once  a  unit  has  successfully  breached  a  minefield, 
vehicles  in  that  unit  are  not  subject  to  mine  detonation 
since  the  clearing  operation  is  assume  to  be  completely 
effective.  Prior  to  that  point,  mines  that  were  not 
cleared  by  a  breaching  vehicle  may  detonate  and  cause 
casualties  to  following  elements. 
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J.  FIRE  AND  DETECTION  MODULES 


The  Fire  and  Detection  modules  operate  simultaneously 
in  the  model.  It  is  possible  for  different  elements  of  the 
same  unit  to  be  detecting  or  firing  during  the  same  30 
second  time  period.  The  model  does  not  restrict  the  unit 
to  either  the  detection  or  firing  phase  during  each  time 
step.  All  elements  initially  start  out  in  the  detection 
mode.  When  element  1  detects  an  opposing  element  J  during 
the  period  (t,t+30)  then  during  the  following  period 
(t+30,t+60)  element  i  enters  the  firing  module  and  conducts 
the  engagement.  If  the  detection  of  element  J  occurred 
during  the  period  (t,t+30)  then  during  the  following  30 
second  time  period  line  of  sight  is  assumed  to  continue  to 
exist  for  the  firing  phase.  It  is  also  assumed  that  if 
element  i  is  busy  firing  during  the  period  (t,t+30)  then  no 
target  search  is  conducted  by  element  i  during  this  time 
interval . 

The  red  forces  may  detect  or  engage  ,  depending  on  the 
type  of  vehicle,  up  to  two  enemy  elements  in  the  thirty 
second  time  period  due  to  their  stationary  defensive 
.posture.  Tanks  can  detect  or  engage  two  elements  in  the 
thirty  second  period  while  a  BMP  is  able  to  either  detect 
or  engage  only  one  target  during  the  time  interval  due  to 
the  characteristics  of  the  weapon  system. 

The  blue  forces,  due  to  their  offensive  posture,  are 
able  to  detect  or  engage  only  one  enemy  element  in  a  time 
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period.  As  a  control  for  fire  distribution  only  2  red 
elements  may  detect  or  engage  any  single  blue  element  at  a 
time  while  4  blue  elements  may  detect/engage  any  single  red 
element  at  a  time. 

Once  a  firer  has  completed  his  direct  fire 
engagement( s ) ,  he  returns  to  the  Detect  module  during  the 
next  time  period  regardless  of  the  outcome  of  the  direct 
fire  engagement.  Even  if  during  the  period  (t,t+30) 
element  j  engaged  but  did  not  kill  element  i,  he  must  still 
go  back  to  the  Detection  module  during  the  next  time  step 
and  attempt  to  redetect  element  i. 

K.  DETECTION  MODULE 

The  Detection  modules  for  the  red  and  blue  forces  are 
exactly  the  same  except  for  minor  differences  which  will  be 
pointed  out  in  the  discussion  as  they  occur.  Figure  11 
shows  the  flow  through  the  red  Detection  module.  The  only 
difference  in  the  flow  through  the  blue  Detection  module  is 
that  the  red  forces  are  always  in  a  defensive  posture, 
therefore  there  is  no  need  for  crossing  velocity 
calculations . 

The  detection  computations  used  in  the  simulation  were 
adapted  from  the  DYNTACS  model  with  some  minor  changes. 
[Ref.  12]  For  each  element  i  the  computations  look  at 
every  enemy  entity  in  the  thirty  second  period  to  determine 
if  they  can  be  detected.  A  detection  rate,  DETRATE,  for 
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Figure  11.  Red  Detection  Flowchart 
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every  enemy  element  is  computed  is  assumed  to  be  constant 
for  at  least  30  seconds.  Then  the  continuous  looking  model 
Is  used  to  compute  the  probability  of  detection  In  equation 
3.4. 

REDPDET  =  1  -  exp(-DETRATE  *  T) 

(equation  3.4) 

where  T  equals  30  seconds.  Finally  a  Bernoulli  trial  Is 
performed  to  determine  whether  or  not  the  target  Is 
detected. 

The  detection  rate  equation  3.5  DETRATE  Is: 

DETRATE  =  RPLOOK  *  (-0.003  +  [1.088  /  DENOM] ) 

(equation  3.5) 

where : 

DENOM  =  1.453  +  (TAU  *  (0.05978  +  2.188  *  RNGAPP  * 
RNGAPP)  -  0.0538  *  CV) 

and  where  the  observation  conditions  are  described  by: 

TAU  =  terrain  complexity  code;  It  can  take  on  values  from  1 
to  7 

RNGAPP  =  apparent  range  In  kilometers.  The  apparent 

range  Is  the  range  at  which  a  fully  exposed  M60  tank  would 

present  an  Image  which  Is  the  same  height  as  the  Image  that 

Is  observed  for  the  current  target.  RNGAPP  Is  computed  as: 

RNGAPP  =  (actual  range  *  M60  height )/( target 
height  *  percent  visible) 

where  the  denominator  In  the  simulation  Is  a  random 
variable.  For  the  attacking  blue  force,  the  percent 
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visible  ranges  from  50  to  100  percent  for  an  offensive 
posture  and  from  50  to  75  percent  for  those  unit  which  have 
assximed  a  defensive  posture.  For  the  red  force  the  percent 
visible  ranges  from  25  to  50  percent  due  to  the 
availability  of  prepared  defensive  positions. 

The  crossing  velocity  (CV)  is  measured  in  meters  per 
second  and  is  the  target  velocity  component  which  is 
perpendicular  to  the  target-observer  line.  It  is  the 
component  of  target  movement  which  is  most  noticeable  to  an 
observer.  The  crossing  velocity  for  the  red  force  is  zero, 
since  they  are  in  stationary  defensive  positions.  When  a 
blue  force  goes  to  a  defensive  posture,  the  model  also  sets 
their  crossing  velocity  component  to  zero. 

RPLOOK  is  the  probability  that  the  observer  is  looking 
in  the  direction  of  the  target  and  is  a  user  input  in  the 
model.  For  the  blue  force  it  is  a  constant  75  percent 
chance  of  looking  in  the  direction  of  the  target  and  for 
the  red  force  it  is  dependent  on  the  avenue  of  approach. 

L.  DIRECT  FIRE  MODULE 

The  Direct  Fire  module  is  stochastically  based  using 
.probabilities  in  a  Monte  Carlo  model  to  determine  the 
outcome  of  an  engagement.  The  range  from  the  firer  to  the 
target  is  calculated  and  then  used  in  a  table  look-up  to 
determine  the  probability  of  a  hit  and  of  a  kill  given  a 
hit.  The  values  are  then  compared  to  a  random  draw  to 
determine  the  outcome  of  the  engagement.  The  only  outcomes 
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are  either  a  kill  or  no/unlmportant  damage.  If  a  target  Is 
killed  It  Is  assigned  a  "dead"  code  and  Is  removed  from  the 
simulation. 

This  completes  all  the  necessary  modules  required  to 
conduct  the  battle  simulation  to  generate  the  data 
necessary  to  analyze  the  measures  of  effectiveness 
developed  In  Chapter  2.  The  output  Is  analyzed  and  the 
MOEs  are  evaluated  In  Chapter  4. 
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IV.  OUTPUT  ANALYSIS 


A.  BASIC  RESULTS 

The  purpose  of  the  simulation  Is  to  generate  output  to 
be  used  In  the  analysis  of  measures  of  effectiveness 
(MOEs).  In  this  section  numerical  results  are  presented 
for  each  configuration  and  scenario.  Fifty  repetitions  of 
each  configuration  were  conducted  and  there  were  5 
different  configurations  evaluated  against  four  different 
scenarios.  The  output  provides  a  performance  evaluation 
prediction  of  the  mine  countermeasures  equipment.  The  four 
scenarios  allow  for  the  MOEs  to  be  evaluated  under  varying 
conditions . 

Scenario  1  evaluates  the  unit’s  performance  when  facing 
only  direct  fire  weapons.  The  purpose  of  this  scenario  is 
to  determine  the  Impact  of  the  countermine  equipment  on  the 
unit's  ability  to  fight  when  no  obstacles  are  present. 
Scenarios  2  and  3  evaluate  the  unit's  performance  when 
faced  by  a  combination  of  direct  fire  weapons  and 
minefields.  Scenario  2  examines  the  situation  where  there 
Is  a  probability  that  the  minefields  are  emplaced;  Scenario 
3  looks  at  the  worse  case  situation:  the  probability  of  the 
minefields  being  In  place  Is  equal  to  1.  Scenario  4  Is 
used  to  determine  the  effectiveness  of  the  countermine 
equipment  when  faced  only  with  minefields. 
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Sample  data  files  used  to  support  the  evaluation  of  the 
MOEs  are  shown  In  Tables  1  and  2  (  all  tables  and  figures 
follow  this  chapter).  In  the  heading  of  Table  1,  the 
starting  force  configuration  Is  shown.  Columns  1  through  4 
tabulate  the  direct  fire  losses  by  repetition.  Column  1  Is 
the  total  number  of  losses,  column  2  Is  the  direct  fire 
losses  of  the  Ml,  column  3  Is  the  direct  fire  losses  to  the 
mlneplow  tanks  and  column  4  is  the  direct  fire  losses  to 
the  mlneroller  tanks. 

Columns  5  and  6  of  Table  1  give  the  losses  of  the 
breaching  device  due  to  mine  detonations.  Columns  7 
through  10  represent  the  losses  to  the  force  due  to  mine 
detonations,  each  column  representing  the  equipment  In  the 
same  order  as  for  the  direct  fire  losses.  Columns  9  and  10 
represent  the  losses  of  the  mlneplow  and  mlneroller  tanks 
when  they  are  not  in  a  breach  mode,  i.e.,  the  breaching 
device  was  not  employed  at  the  time  of  detonation. 

Columns  11  and  12  represent  the  losses  of  the  mlneplow 
tank  and  mlneroller  tank  due  to  mine  detonations  while 
attempting  to  breach  the  minefield.  Column  13  Is  the  total 
number  of  kills  due  to  both  direct  fire  and  mine 
detonations  and  Is  the  summation  of  columns  1,7,11  and  12. 
Column  14  is  the  length  of  the  battle  while  column  15  Is 
the  minimum  range  attained  by  any  unit  during  the  battle. 

Table  2  gives  the  status  of  the  minefields  on  each  axis 
and  the  time  a  unit  went  to  a  defensive  posture.  Columns 
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Ml  (far  minefield)  and  M2  (near  minefield)  give  the  status 
of  the  minefield,  a  1  representing  an  active  field  while  a 
0  represents  an  inactive  field.  The  time  to  defensive 
posture  is  given  for  each  unit,  a  time  of  0.0  meaning  the 
unit  did  not  assume  the  defense.  The  last  column  is  the 
time  to  battle  termination  and  is  the  same  as  column  14  in 
Table  1. 

Tables  3,4,5  and  6  show  the  results  of  the  evaluation 
of  the  output  as  derived  from  the  MOEs.  The  sample  mean  is 
given,  followed  by  the  sample  standard  deviation  in 
parentheses.  Each  column  is  the  evaluation  of  a  particular 
configuration  against  all  applicable  MOEs.  Obviously  in 
some  cases  an  MOE  does  not  apply  due  to  a  quantity  required 
not  being  available,  such  as  the  number  of  pieces  of 
breaching  equipment  in  the  unit  configuration  14/0/0. 

B.  EVALUATION  OF  MOEs 

MOEs  1  (Figure  12),  2  (Figure  13)  and  3  (Figure  14)  all 
deal  with  losses  to  the  blue  force  versus  their  starting 
strength.  The  value  for  MOE  1  was  found  by  using  column  1, 
Table  1  divided  by  56  to  give  a  percentage  of  losses  due  to 
direct  fire.  Figure  12  shows  the  comparison  of  each 
configuration  under  each  scenario.  Direct  fire  losses  for 
configuration  14/0/0  are  low  when  no  mines  are  present,  but 
are  the  highest  of  any  configuration  as  soon  as  minefields 
are  Introduced  into  the  area  of  operations.  Of  interest  is 
the  fact  that  even  though  the  configurations  with 
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breaching  equipment  have  higher  direct  fire  losses  than 
the  configuration  without  breaching  equipment,  the 
difference  Is  3  or  4  percentage  points  at  most. 

MOE  2  examines  the  losses  due  to  mine  detonations  In 
Figure  13.  Values  are  found  by  summing  the  losses  In 
columns  7,11  and  12  from  Table  1,  and  dividing  by  the 
starting  strength  of  the  battalion.  Intuition  would 
dictate  that  the  losses  to  the  force  with  no  breaching 
equipment  would  be  higher  than  those  configurations  with 
breaching  equipment.  This  Is  not  the  case.  Since  each  unit 
acts  Independently  to  detect  minefields  and  the  formation 
used  does  not  place  the  breaching  equipment  In  the  lead, 
losses  due  to  Initial  entry  Into  a  minefield  should  be  the 
same  for  all  force  structures.  It  Is  at  this  point  that 
the  casualties  due  to  mines  Increase  for  the  forces  with 
breaching  equipment.  The  unit  with  no  breaching  equipment 
will  usually  bypass  the  minefields  and  therefore  sustain  no 
further  mine  casualties,  while  the  units  with  breaching 
equipment  conducts  a  breach,  losing  more  equipment  to  mines 
In  the  process. 

MOE  3  compares  the  losses  to  each  unit  due  to  both 
mines  and  direct  fire  In  Figure  14.  The  values  are  found 
by  using  column  13  from  Table  1  divided  by  56.  It  Is 
Interesting  to  note  that  In  the  cases  of  the  probability  of 
minefields  with  direct  fire  and  100  percent  probability  of 
minefields  with  direct  fire,  the  12/1/1  configuration 


53 


I 


performed  better  than  the  10/2/2  combination.  This  is  due 
to  the  fact  that  most  of  the  breaching  assets  in  the  12/1/1 
configuration  are  lost  during  the  breach  of  the  far 
minefield  and  the  unit  is  able  to  travel  faster  in  the  2600 
to  1500  meter  range  band,  thereby  being  subjected  to  the 
enemy's  direct  fire  weapons  for  a  shorter  period.  Of  the 
configurations  with  breaching  equipment,  the  8/3/3  unit 
does  the  best  when  there  is  no  direct  fire. 

MOEs  4,5  and  6  compare  the  losses  of  equipment  versus 
the  number  of  pieces  of  breaching  equipment  available  in 
the  unit.  Their  values  are  computed  in  the  same  manner  as 
MOEs  1,2  and  3  except  the  denominator  is  the  number  of 
pieces  of  breaching  equipment.  Due  to  a  changing 
denominator,  the  comparison  of  the  of  the  various 
configurations  is  difficult.  However  the  MOEs  show  the 
Increasing  number  of  casualties  as  the  probability  of  the 
minefields  increase  (Figure  15).  The  synergistic  effect  of 
the  combination  of  direct  fire  and  minefields  is  clearly 
evident  (Figure  16).  The  losses  to  any  of  the  forces  is 
the  lowest  when  faced  by  direct  fire  only,  increasing 
slightly  when  faced  by  minefields  only,  and  increasing 
drastically  when  the  combination  of  the  two  systems 
Interact  to  defeat  the  enemy  ( Figure  17 ) . 

Since  the  number  of  pieces  of  breaching  equipment  are 
the  same  in  the  10/2/2  and  the  10/3/1  configurations  they 
may  be  examined  in  more  detail  for  these  MOEs.  The  10/2/2 
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configuration  performed  better  when  the  unit  was  faced  by 
direct  fire  only  or  minefields  only,  however  the  difference 
Is  minimal.  When  faced  with  a  combination  of  mines  and 
direct  fire,  the  10/3/1  configuration  fared  slightly  better 
In  both  the  number  of  direct  fire  casualties  per  piece  of 
breaching  equipment  (Figure  16)  and  the  total  number  of 
casualties  due  to  mines  and  direct  fire  combined  (Figure 
17). 

The  number  of  units  going  to  a  defensive  posture  is 
shown  by  MOE  7  (Figure  18).  The  number  is  obtained  from 
columns  3,6,9  and  12  from  Table  2.  In  the  scenario  with 
direct  fire  only,  the  number  of  units  going  to  defensive 
posture  Is  relatively  the  same  for  all  configurations, 
thereby  again  substantiating  the  point  that  the  countermine 
equipment  does  not  impact  a  great  deal  on  the  unit  when  It 
is  faced  only  by  direct  fire.  Even  when  the  units  are 
faced  by  scenario  2  (probability  of  minefields  and  direct 
fire)  the  number  of  units  going  to  defensive  posture  does 
not  differ  a  great  deal.  It  Is  only  when  there  exists  a 
100  percent  chance  of  minefields  that  differences  becomes 
large.  The  best  performer  for  the  configurations  with 
breaching  equipment  when  faced  only  by  minefields  Is  the 
8/3/3  combination  while  the  12/1/1  combination  was  the 
worst.  However  when  faced  by  the  probability  of  minefields 
and  direct  fire  the  number  of  units  going  to  a  defensive 
posture  was  significantly  lower  for  the  12/1/1  combination 


and  even  the  10/2/2  combination  did  better.  This  can  be 
attributed  In  part  to  the  fact  that  the  breaching  equipment 
Is  prevented,  by  the  simulation,  from  engaging  while 
breaching  operations  are  taking  place. 

MOE  8  examines  the  period  in  the  battle  when  the  units 
went  to  a  defensive  posture  ( Figure  19 ) .  The  battle  was 
divided  Into  four  time  periods  -  beginning,  early,  middle 
and  late  -  each  period  representing  one  fourth  of  the 
duration  of  the  battle.  The  determination  of  which  period 
a  unit  went  to  a  defensive  posture  was  calculated  by  taking 
the  battle  time  of  each  repetition  and  determining  In  which 
quarter  the  defensive  times  fell. 

Once  again  all  configurations  performed  equally  well 
when  there  were  no  minefields  and  the  units  were  faced  only 
by  direct  fire.  In  this  MOE  all  the  configurations  with 
breaching  equipment  performed  better  then  the  14/0/0 
configuration.  The  14/0/0  configuration  tended  to  go  to  a 
defensive  posture  much  earlier  In  the  battle  due  to  the 
reduced  speed  Imposed  by  the  bypass  routine.  The  14/0/0 
configuration  Is  able  to  reach  the  far  set  of  minefields 
quicker  then  the  other  configurations  where  It  Is  then 
stopped  and  is  attritted  by  the  enemy.  The  configurations 
with  breaching  equipment  were  able  to  keep  moving  much 
longer  in  the  battle,  with  the  10/2/2  combination 
performing  the  best. 
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The  length  of  the  battle  Is  described  by  MOE  9  (Figure 
20).  Once  again  the  numbers  are  misleading  unless  they  are 
examined  closely.  In  scenario  1,  the  14/0/0  unit  Is  able 
to  close  with  the  enemy  much  sooner  ( due  to  no  speed 
degradation  caused  by  the  breaching  equipment )  than  the 
units  with  breaching  equipment.  The  length  of  the  attack 
Is  approximately  six  kilometers  and  the  higher  speeds  of 
the  Ml  unit  allows  it  to  travel  faster.  Similarly,  the 
probability  of  minefields  combined  with  direct  fire  still 
produced  quicker  battle  times  for  the  14/0/0  combination, 
since  If  at  least  two  units  did  not  encounter  the  far 
minefield,  they  could  close  rapidly  with  the  enemy  and 
defeat  him.  The  time  of  battle  for  100%  minefields  and 
direct  fire  is  essentially  equal  for  all  configurations, 
with  the  14/0/0  configuration  able  to  move  rapidly  between 
minefields  and  then  losing  time  while  bypassing.  The 
average  length  of  battle  when  there  are  only  minefields 
present  was  approximately  the  same  for  all  configurations 
with  breaching  equipment.  It  was  also  approximately  the 
same  when  each  configuration  Is  compared  between  the  two 
scenarios  of  100%  minefields/direct  fire  and  when  there  are 
only  minefields  present.  The  big  Increase  In  time  occurs 
in  the  14/0/0  configuration,  starting  from  a  low  in  the 
0%/dlrect  fire  scenario  to  a  maximum  in  the  100%/no  direct 
fire  case.  It  should  be  noted  that  the  only  battle 
termination  criteria  that  applies  in  the  100%/no  direct 
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fire  is  the  minimum  range  requirement  of  250  meters  and 
this  requirement  causes  the  14/0/0  configuration  to  bypass 
both  the  far  and  near  minefields. 

The  average  range  at  battle  termination  is  MOE  10 
(Figure  21).  All  values  are  approximately  the  same  with 
one  notable  exception,  that  of  the  14/0/0  configuration  In 
the  scenario  of  probability  of  minefields/  direct  fire. 
This  dramatic  Increase,  in  relation  not  only  with  Itself 
but  also  with  the  other  configurations,  is  attributed  to 
the  fact  that  the  units  on  the  avenues  that  are  not  faced 
by  a  minefield  move  rapidly  through  the  area  and  suddenly 
find  themselves  In  a  direct  fire  battle  with  the  enemy 
where  they  are  attritted  to  a  defensive  posture  early  in 
the  battle.  This  fact  is  substantiated  by  consideration  of 
MOE  8,  Figure  19,  where  the  number  of  units  going  to  a 
defensive  posture  in  the  middle  of  the  battle  is 
substantially  higher  for  the  14/0/0  configuration. 

The  rate  of  battle  losses  is  the  last  MOE.  Figure  22 
shows  the  rates  which  were  determined  by  taking  the  total 
number  of  casualties  per  repetition  (column  13,  Table  1) 
.and  dividing  by  the  length  of  battle  for  the  repetition 
(column  14,  Table  1).  The  figures,  when  comparing  the 
14/0/0  configuration  with  the  rest  of  the  configurations, 
are  somewhat  misleading.  The  14/0/0  had  the  least  number 
of  losses  in  all  cases,  but  since  they  are  able  to  travel 
faster,  battle  time  was  shorter,  causing  the  rate  to  appear 
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artificially  high.  Among  the  configurations  with  breaching 
equipment,  there  is  no  single  best  performer,  although  the 
12/1/i  and  the  8/3/3  configurations  were  better  than  the 
others . 

C.  SUMMARY  OF  RESULTS  -  MODEL  ONE 

Upon  examination  of  all  the  configurations  with 
breaching  equipment  under  the  four  different  scenarios,  the 
best  performer  was  the  12/1/1  combination.  The  reason  is 
that  the  breaching  assets  of  the  12/1/1  configuration  are, 
in  most  cases,  just  enough  to  allow  the  unit  to  breach 
through  the  low  density  far  minefield  and  then  continue  the 
attack  without  being  encumbered  by  the  slow  moving 
breaching  equipment.  The  low  amount  of  breaching  equipment 
also  means  that  the  majority  of  the  force  is  able  to  engage 
the  enemy  while  breaching  operations  are  taking  place. 

The  only  configuration  that  clearly  performs  better 
than  the  12/1/1  configuration  is  the  8/3/3.  This 
configuration  is  of  greater  benefit  when  there  is  no  direct 
fire  and  it  is  in  these  situations  that  the  8/3/3 
configuration  does  perform  better. 

D.  SENSITIVITY  ANALYSIS  USING  THE  ENHANCED  MODEL 

Sensitivity  analysis  was  conducted  through  the  use  of 

the  second  model.  As  discussed  in  Chapter  3,  the  second 
model  was  developed  using  the  concept  of  perfect 
communications.  When  one  unit  encounters  a  minefield,  the 


rest  of  the  units  redeploy  In  formation  3,  placing  the 
roller  assets  In  the  lead  to  detect  the  minefields  on  their 
avenue.  Two  configurations,  the  12/1/1  and  the  10/2/2, 
were  evaluated  under  two  scenarios,  the  probability  of 
minefields/direct  fire  and  the  100%  mlneflelds/no  direct 
fire,  and  the  output  was  analyzed  under  the  same  MOEs  and 
compared  to  the  values  found  using  Model  1.  Table  7  shows 
the  mean  and  standard  deviation  of  the  50  repetitions 
conducted  under  each  configuration  and  scenario. 

The  two  configurations  are  compared  against  the  base 
case  configuration  of  14/0/0.  Figure  23  shows  the 
comparison  using  MOE  1.  In  both  configurations  the 
performance  using  Model  1  was  slightly  better.  However, 
using  MOE  2,  the  losses  due  to  mines  was  greatly  reduced 
using  Model  2,  even  to  the  point  that  the  12/1/1 
configuration  performed  better  than  the  14/0/0 
configuration  (Figure  24).  Figure  25  shows  the  total 
percent  of  losses  due  to  both  mines  and  direct  fire.  The 
configurations  once  again  performed  better  under  Model  2, 
even  to  the  point  that  the  12/1/1  configuration  suffered 
fewer  losses  than  the  14/0/0  configuration  in  the 
probability  of  minefields/  direct  fire  scenario. 

MOEs  4  (Figure  26),  5  (Figure  27),  and  6  (Figure  28) 

compare  the  configurations  when  the  amount  of  breaching 
equipment  is  constant.  In  all  four  cases  the  losses  per 
piece  of  breaching  equipment  dropped  under  Model  2,  however 


there  was  a  slight  Increase  In  the  direct  fire  losses. 
This  can  be  attributed  to  the  fact  that  once  the  first 
minefield  is  detected,  the  units  move  only  as  fast  as  the 
mlneroller  tank.  Overall,  the  two  configurations  performed 
better  under  Model  2. 

The  percent  of  units  assuming  a  defensive  posture 
decreased  under  both  scenarios  of  the  12/1/1  configuration, 
but  the  results  were  mixed  for  the  10/2/2  configuration 
(Figure  29).  The  period  in  the  battle  also  showed  an 
improvement  for  the  12/1/1  configuration  under  Model  2.  In 
the  probability  of  minefields/direct  fire  scenario,  the 
number  going  to  a  defensive  posture  in  the  middle  phase  of 
the  battle  droppfed  dramatically,  with  a  slight  decrease 
occurring  in  the  late  battle  also. 

Once  again  the  average  length  of  battle  figures  are 
deceiving  unless  examined  closely.  Figure  31  show  an 
increase  in  all  the  battle  times.  This  is  entirely  due  to 
the  fact  that  once  the  first  minefield  is 
detected/detonated,  the  fastest  speed  a  unit  can  move  is 
that  of  the  mlneroller  tank,  at  least  until  it  is 
attritted. 

Figure  32  shows  the  average  ending  range  of  the  battle 
with  the  results  indicating  little  or  no  difference  between 
the  two  models.  Finally,  Figure  33  shows  the  rate  of 
battle  losses,  again  with  a  dramatic  improvement  for  Model 
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2.  Obviously  the  contributing  factor  is  the  decrease  in 
losses  to  the  force  due  to  mine  encounters. 

The  tactics  used  by  the  attacking  force,  in  particular 
the  method  of  detecting  the  obstacles.  Impacts  heavily  on 
the  performance  of  the  unit.  Under  Model  2  the  12/1/1 
configuration  once  again  performed  better  than  the  10/2/2 
configuration  when  evaluated  under  the  two  scenarios, 
because  the  majority  of  the  breaching  equipment  is  lost 
during  the  conduct  of  the  first  breach  and  the  unit  is  able 
to  travel  faster.  Also,  under  the  probability  of 
minefields/direct  fire  scenario,  if  one  unit  detects  a 
minefield  and  is  slowed  in  its  progress,  it  will  be  able  to 
easily  catch  up  to  the  unit  that  did  not  encounter  a 
minefield,  since  that  unit  is  moving  only  as  fast  as  the 
employed  mineroller  tank.  This  allows  the  units  to  align 
themselves  to  concentrate  their  fires  on  the  target. 

E.  FINAL  CONCLUSIONS 

Based  on  the  evaluation  of  the  MOEs  using  the  output 
from  both  Models  1  and  2  the  following  observations  and 
conclusions  can  be  made.  The  amount  of  breaching  equipment 
required  to  support  an  armor  battalion  is  sltuationally 
dependent . 

The  various  factors  weighing  heavily  on  the  required 
number  of  breaching  assets  are  the  enemy,  terrain,  mission 
and  tactics.  If  a  battalion  is  assigned  a  clearing  mission 
in  a  lightly  defended  area,  a  force  configured  with  a 
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larger  number  of  breaching  assets  would  perform  better, 
although  if  time  was  not  crucial  and  the  threat  Involved 
was  low,  a  smaller  number  of  breaching  assets  would  prove 
to  be  Just  as  effective. 

If  the  area  of  operations  Is  heavily  defended,  a  force 
configuration  that  would  allow  the  unit  to  breach  the  outer 
obstacles  and  then  rapidly  close  with  and  defeat  the  enemy 
force  would  call  for  a  smaller  number  of  breaching  assets. 
If  the  terrain  restricts  maneuver  space  to  such  a  degree 
that  the  bypass  option  Is  no  longer  viable,  the  number  of 
assets  would  have  to  be  Increased  to  Insure  a  greater 
degree  of  success. 

Based  on  the  configurations  and  scenarios  examined  In 
this  thesis,  a  force  structure  of  12  tanks,  1  mlneplow  and 
1  mlneroller  tank  Is  recommended,  however  further  analysis 
In  this  area  should  be  conducted  to  confirm  the  results. 


UNIT  1  UNITCODE  1  EQUIP  TANK  10  MINEPLOH  2  0  MINEROLLER  2  0 

UNIT  2  UNITCODE  1  EQUIP  TANK  10  MINEPLOM  2  0  MINEROLLER  2  0 

UNIT  3  UNITCODE  1  EQUIP  TANK  10  MINEPLOH  2  0  MINEROLLER  2  0 

UNIT  4  UNITCODE  1  EQUIP  TANK  10  MINEPLOH  2  0  MINEROLLER  2  0 

NUMBER  OP  KILLS  BY  CATEGORY  PER  REPITITION 
DIRECTPIRE  ROLL  PLOH  MINEFIELD  PLOHCARR  ROLLCARR  TOTKILL  CLOCK  MINRN6 


40/30/ 
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7 

1 

0 

5/ 

5/ 

0/ 
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25/20/ 

2/ 

3 

1 
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5/ 
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8/ 
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0/ 

0/ 
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3/ 
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0 
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0/ 
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3 
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1/ 
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1 
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7/ 

7/ 

0/ 
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2/ 

2/ 

0/ 

0 

17/14/ 

2/ 

1 

3 
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4/ 

4/ 

0/ 
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4/ 

6 

2 
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5/ 

5/ 

0/ 
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20/14/ 

3/ 

3 

5 

1 

16/16/ 

0/ 
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23/14/ 

4/ 

5 

1 
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3/ 

3/ 

0/ 

0 
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1/ 

7 

0 
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1/ 

1/ 

0/ 
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3/ 
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1 

0 

1/ 

1/ 

0/ 
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0/ 

1 

3 

0 

1/ 

1/ 

0/ 
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2/ 

1 

1 
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4/ 

4/ 

0/ 
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9/  5/ 

2/ 

2 

0 
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1/ 

1/ 

0/ 

0 

16/12/ 

1/ 

3 

1 

0 

1/ 

1/ 

0/ 
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15/  9/ 

3/ 

3 

1 
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5/ 

5/ 

0/ 
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30/24/ 

2/ 

4 

4 

1 

10/10/ 

0/ 

0 

29/19/ 

3/ 

7 

0 

0 

6/ 

6/ 

0/ 

0 

20/13/ 

3/ 

4 

1 

0 

7/ 

7/ 

0/ 
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8/  6/ 

2/ 

0 
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1/ 

1/ 

0/ 
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3/ 

4 
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6/ 
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0/ 
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2 
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2/ 
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0/ 
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1/ 
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3/ 

3/ 

0/ 
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2/ 

1 

7 

1 
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0/ 

0 
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3/ 

3 

2 
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1/ 

1/ 

0/ 

0 

14/  9/ 

2/ 

3 

1 
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4/ 

4/ 

0/ 
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2/ 
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1 
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2/ 

2/ 

0/ 

0 
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1/ 

3 

3 

0 

6/ 

6/ 

0/ 

0 

23/16/ 

3/ 

4 

0 

0 

3/ 

3/ 

0/ 

0 

22/14/ 

3/ 

5 

1 

0 

2/ 

2/ 

0/ 

0 

9/  5/ 

1/ 

3 

1 

0 

1/ 

1/ 

0/ 

0 

11/  8/ 

2/ 

1 

0 

0 

4/ 

4/ 

0/ 

0 

16/  9/ 

2/ 

5 

0 

0 

2/ 

2/ 

0/ 

0 

20/16/ 

1/ 

3 

3 

0 

13/13/ 

0/ 

0 

20/16/ 

0/ 

4 

1 

0 

1/ 

1/ 

0/ 

0 

26/19/ 

2/ 

5 

0 

0 

1/ 

1/ 

0/ 

0 

16/11/ 

1/ 

4 

1 

0 

1/ 

1/ 

0/ 

0 

15/11/ 

0/ 

4 

1 

1 

4/ 

4/ 

0/ 

0 

15/10/ 

2/ 

3 

0 

0 

1/ 

1/ 

0/ 

0 

20/13/ 

3/ 

4 

0 

0 

4/ 

4/ 

0/ 

0 

18/12/ 

2/ 

4 

0 

0 

2/ 

2/ 

0/ 

0 

12/  7/ 

1/ 

4 

0 

0 

3/ 

3/ 

0/ 

0 

10/  8/ 

0/ 

2 

0 

0 

2/ 

2/ 

0/ 

0 

24/19/ 

2/ 

3 

2 

0 

2/ 

2/ 

0/ 

0 

.24/13/ 

4/ 

7 

0 

0 

4/ 

4/ 

0/ 

0 

15/11/ 

1/ 

3 

1 

0 

1/ 

1/ 

0/ 

0 

4  0  49  54.5  1.27S 

5  2  37  47.5  1.014 

2  0  25  41.0  0.S03 

2  0  21  40.0  1.228 

1  0  21  40.5  1.303 

4  0  36  46.5  1.581 

2  0  26  42.5  1.588 

1*0  26  43.0  0.711 

3  0  24  42.0  0.933 

4  0  36  49.5  0.877 

4  0  40  46.0  1.414 

1  0  27  41.0  2.141 

4  1  28  45.5  0.643 

1  0  25  44.0  0.651 

4  0  18  43.0  1.113 

3  2  29  45.0  0.936 

0  0  10  35.5  1.525 

4  1  22  43.0  0.799 

2  1  23  41.5  1.105 

5  0  45  50.5  0.910 

1  0  36  44.0  0.794 

2  3  32  48.0  0.937 

009  37.5  1.236 

3  1  38  47.5  1.005 

3  0  13  40.5  1.374 

3  1  38  49.0  0.889 

4  0  24  42.0  1.110 

5  0  38  50.0  0.356 

3  1  24  42.0  0.944 

3  0  21  40.5  1.152 

1  0  25  43.0  0.866 

7  2  35  49.0  1.101 

3  0  29  42.5  1.119 

3  1  28  41.5  1.479 

0  0  10  38.0  1.349 

0  0  15  42.0  1.009 

1  0  19  42.0  1.087 

7  2  42  53.5  1.265 

4  0  25  43.5  0.966 

1  0  28  44.0  1.104 

2  0  19  41.5  1.178 

1  1  21  42.0  0.914 

2  1  19  42.0  0.963 

1  0  25  43.0  1.108 

3  0  23  42.5  1.197 

2  0  17  40.5  1.337 

3  0  15  42.0  1.131 

2  0  28  43.5  1.502 

0  0  28  42.0  0.962 

4  1  21  44.5  1.040 


TABLE  1.  VEHICLE  LOSSES,  TIME  AND  RANGE  OUTPUT  FILE 


ACTIVE  MINEFIELDS  AND 
AVENUE  1  AVENUE  2 

TIMES  TO  DEFENSIVE  POSTURE 
AVENUE  3  AVENUE  4 

RUN  TIME 

Ml 

M9 

Ml 

M2 

Ml 

M2 

Ml 

MZ 

40.5 

1 

I 

4<.0 

1 

1 

34.5 

1 

1 

49.5 

1 

1 

41.0 

1 

1 

0.0 

1 

0 

0.0 

0 

1 

41.0 

1 

0 

0.0 

42.5 

1 

1 

0.0 

1 

1 

34.5 

1 

0 

0.0 

0 

1 

0.0 

42.5 

1 

I 

0.0 

0 

1 

0.0 

0 

1 

37.0 

1 

1 

0.0 

43.5 

0 

1 

0.0 

1 

1 

0.0 

0 

1 

0.0 

1 

1 

0.0 

42.5 

1 

0 

0.0 

1 

1 

40.5 

0 

1 

0.0 

0 

1 

0.0 

42.0 

0 

i 

0.0 

1 

1 

40.0 

1 

1 

0.0 

0 

1 

0.0 

40.5 

1 

1 

40.0 

1 

1 

40.0 

1 

1 

43.0 

0 

0 

0.0 

45.5 

1 

1 

0.0 

0 

0 

42.0 

1 

1 

35.5 

1 

1 

0.0 

43 . 0 

1 

1 

0.0 

1 

1 

40.0 

0 

1 

0.0 

0 

1 

0.0 

42.5 

1 

1 

43.5 

1 

1 

41.5 

1 

1 

38.5 

1 

1 

42.5 

45.0 

0 

1 

0.0 

1 

1 

0.0 

0 

1 

0.0 

0 

1 

0.0 

39.0 

0 

0 

0.0 

1 

1 

45.0 

1 

1 

34.5 

1 

1 

47.5 

49.0 

1 

1 

0.0 

0 

1 

0.0 

0 

1 

34.5 

1 

1 

0.0 

45.5 

1 

1 

0.0 

1 

0 

0.0 

0 

1 

0.0 

1 

1 

0.0 

42.5 

0 

1 

0.0 

1 

1 

38.0 

1 

1 

40.0 

1 

1 

0.0 

44.0 

1 

1 

0.0 

0 

1 

0.0 

1 

1 

34.0 

1 

1 

0.0 

39.5 

0 

1 

0.0 

0 

1 

0.0 

1 

1 

34.5 

0 

1 

0.0 

41.0 

0 

1 

0.0 

1 

1 

0.0 

0 

1 

0.0 

1 

1 

0.0 

43.0 

1 

1 

0.0 

0 

1 

0.0 

1 

1 

37.0 

1 

1 

0.0 

43.0 

0 

1 

0.0 

1 

1 

0.0 

0 

0 

0.0 

1 

1 

0.0 

40.5 

1 

1 

0.0 

1 

1 

0.0 

0 

1 

0.0 

1 

0 

0.0 

44.0 

1 

1 

0.0 

1 

1 

0.0 

1 

1 

34.5 

0 

1 

0.0 

41.0 

1 

0 

40.5 

1 

1 

33.5 

0 

0 

38.5 

1 

1 

0.0 

41.0 

1 

1 

0.0 

1 

1 

0.0 

0 

1 

38.0 

0 

1 

0.0 

41.5 

1 

1 

0.0 

1 

1 

0.0 

0 

1 

37.0 

1 

0 

0.0 

43.0 

1 

1 

0.0 

0 

1 

0.0 

0 

1 

0.0 

1 

1 

0.0 

40.5 

1 

1 

41.5 

1 

0 

37.5 

1 

0 

38.5 

1 

1 

44.0 

49.0 

1 

1 

0.0 

0 

0 

0.0 

1 

1 

45.0 

1 

1 

0.0 

46.0 

1 

1 

0.0 

0 

1 

0.0 

1 

1 

0.0 

0 

0 

0.0 

40.5 

I 

1 

0.0 

1 

1 

0.0 

0 

1 

0.0 

0 

1 

0.0 

43.5 

1 

1 

0.0 

0 

1 

0.0 

1 

1 

0.0 

0 

1 

0.0 

35.5 

0 

1 

0.0 

1 

1 

34.0 

1 

1 

34.5 

0 

1 

0.0 

40.5 

1 

1 

0.0 

0 

1 

0.0 

1 

1 

0.0 

1 

1 

0.0 

41.5 

1 

1 

0.0 

1 

1 

34.5 

1 

1 

37.5 

0 

1 

0.0 

46.5 

1 

1 

0.0 

0 

1 

0.0 

0 

0 

40.0 

0 

1 

0.0 

43.5 

1 

1 

0.0 

1 

1 

0.0 

1 

1 

38.0 

0 

1 

0.0 

45.5 

1 

1 

0.0 

1 

1 

0.0 

0 

1 

38.5 

0 

1 

0.0 

42.0 

1 

0 

0.0 

1 

1 

0.0 

1 

0 

38.0 

0 

1 

0.0 

42.5 

1 

1 

0.0 

0 

0 

0.0 

0 

1 

0.0 

1 

0 

0.0 

38.0 

0 

1 

0.0 

1 

1 

0.0 

0 

1 

40.5 

0 

1 

0.0 

46 . 0 

1 

0 

39.0 

1 

1 

39.0 

1 

1 

35.5 

1 

1 

0.0 

41.5 

1 

1 

0.0 

0 

1 

45.5 

1 

1 

33.0 

0 

1 

44.5 

46 . 0 

1 

I 

0.0 

0 

0 

0.0 

1 

1 

34.5 

1 

1 

0.0 

42.0 

1 

1 

0.0 

0 

1 

0.0 

1 

1 

35.5 

0 

0 

0.0 

42.0 

I 

1 

41.5 

1 

1 

43.0 

1 

1 

38.0 

1 

1 

0.0 

44.5 

1 

1 

38.0 

0 

1 

41.5 

0 

1 

40.5 

0 

1 

0.0 

42.0 

1 

0 

0.0 

1 

1 

40.5 

1 

1 

55.5 

1 

1 

0.0 

43.5 

1 

1 

0.0 

0 

1 

0.0 

1 

1 

0.0 

0 

1 

0.0 

37.5 

1 

0 

0.0 

1 

1 

0.0 

0 

1 

0.0 

1 

1 

0.0 

43.5 

TABLE  2.  MINEFIELD  STATUS  AND  DEFENSIVE  POSTURE  TIME 

OUTPUT  FILE 


No  Minefields/Direct  Fire 


Unit  Configuration 


1 4/0/0 

12/1/1 

10/2/2 

8/3/3 

10/3/1 

1 

■tugw 

IwMliSli 

■tUBjfcW 

2 

N/A 

N/A 

N/A 

N/A 

N/A 

3 

0.239 

(0.098) 

0.251 

(0.098) 

0.252 

(0.099) 

0.268 

(0.105) 

0.235 

(0.092) 

4 

N/A 

N/A 

N/A 

N/A 

N/A 

5 

N/A 

7.020 

(2.808) 

3.525 

(1.384) 

2.500 

(0.983) 

3.295 

(1.291) 

6 

N/A 

7.020 

(2.808) 

3.525 

(1.384) 

2.500 

(0.983) 

3.295 

(1.291) 

7 

1 6/200 

21/200 

14/200 

20/200 

13/200 

8 

mm 

0  0 

0  21 

0  0 

0  14 

0  0 

0  20 

0  0 

0  13 

9 

24.21 

(0.969) 

36.80 

(1.484) 

36.85 

(1.543) 

10 

mamm 

mwuLwm 

IttMlai 

■IBKlf 

HMWyJi 

1  1 

0.548 

(0.204) 

0.378 

(0.139) 

0.379 

(0.136) 

0.402 

(0.144) 

0.359 

(0.128) 

TABLE  3.  NO  MINEFIELDS/DIRECT  FIRE  STATISTICS 


Measure  of  Effectiveness 


TABLE 


Prob  Minefields/Direct  Fire 


Unit  Configuration 


14/0/0 

12/1 /I 

10/2/2 

8/3/3 

10/3/1 

1 

0.338 

(0.127) 

0.292 

(0.105) 

0.328 

(0.147) 

0.317 

(0.133) 

0.308 

(0.430) 

2 

0.105 

(0.064) 

0.153^ 

(0.076) 

0.170^ 

(0.087) 

0.160^ 

(0.084) 

0.174 

(0.085) 

3 

0.444, 

(0.152) 

0.446, 

(0.144) 

0.498, 

(0.181) 

0.477 

(0.173) 

0.482, 

(0.184) 

4 

N/A 

4.300 

(2.126) 

2.380 

(1.220) 

1.493 

(0.782) 

2.435 

(1.195) 

5 

N/A 

8. 1 90 
(2.948) 

4.590 

(2.056) 

2.963 

(1.246) 

4.320 

(1.997) 

6 

N/A 

12.49^ 

(4.039) 

6.970 

(2.538) 

4.457 

(1.613) 

6.755 

(2.570) 

7 

74/200 

71/200 

77/200 

85/200 

81/200 

8 

1  4 

27  42 

0  0 
10  61 

0  4 

12  61 

0  0 

1 1  84 

0  12 

4  65 

9 

33.87 
(1 1.37) 

40.02 

(5.372) 

41.63 

(9.287) 

40.45 

(5.358) 

42.70 

(13.29) 

10 

2.096 

(3.742) 

1.098 

(0.300) 

1.015 

(0.335) 

1.026 

(0.305) 

1.062 

(0.292) 

1  1 

0.737 

(0.160) 

0.615 

(0.153) 

0.660 

(0.148) 

0.648 

(0.184) 

0.629 

(0.151) 

4.  PROBABILITY  OF  MINEFIELDS/DIRECT  FIRE  STATISTICS 
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100%  Minefields/No  Direct  Fire 

Unit  Configuration 


14/0/0 

12/1/1 

10/2/2 

8/3/3 

10/3/1 

cn  1 

N/A 

N/A 

N/A 

N/A 

N/A 

(f)  o 

cu  z 

11 

11 

^  -7 

CD  3 

IftJmaeil 

0.346 

f0.093) 

0.356 

f0.080) 

0.321 

(0.062) 

0.368 

(0.080) 

4 

o  ^ 

N/A 

^  5 

N/A 

N/A 

N/A 

N/A 

N/A 

^  6 

H — 

N/A 

PIPI 

1 

O  7 

2/200 

44/200 

35/200 

14/200 

35/200 

F  8 

0  2 
0  0 

0  0 
15  29 

0  0 

0  35 

0  0 

0  14 

0  0 

0  35 

CO  Q 

O  ^ 

,62.83, 

(4.738) 

,49.91, 

(7.878) 

,44.15, 

(1.408) 

,44.08, 

(0.798) 

,43.92, 

(1.153) 

1  10 

0.218 

(0.022) 

0.217^ 

(0.027) 

0.215, 

(0.028) 

0.214^ 

(0.024) 

0.214^ 

(0.022) 

1  1 

0.192, 

(0.056) 

0.396 
(0.1  19) 

0.452 

(0.102) 

0.409 

(0.083) 

0.470^ 

(0.105) 

TABLE  6.  100%  MINEFIELDS  NO  DIRECT  FIRE  STATISTICS 


69 


MEASURE  OF  EFFECTIVENESS  1 

%  LOSSES  TO  DF 


\Z2  lVO/0 

m  12/1/1 
1 0/2/2 
8/3/3 
10/3/1 


4  SCENARIOS:  MINEFIELDS/DIRECT  FIRE 


Figure  12.  Model  1  Measure  of  Effectivess  1 


MEASURE  OF  EFFECTIVENESS  2 

%  LOSSES  TO  MINES 


1 4/0/0 

12/1/1 

10/2/2 

8/3/3 

10/3/1 


Figure  13.  Model  1  Measure  of  Effectiveness  2 


MEASURE  OF  EFFECTIVENESS  3 

%  LOSSES  TOTAL 


1 4/0/0 
12/1/1 
1 0/2/2 
8/3/3 
10/3/1 


Figure  14.  Model  1  Measure  of  Effectiveness  3 


MEASURE  OF  EFFECTIVENESS  4 

#  MINE  CAS  PER  PIECE 


Figure  15.  Model  1  Measure  of  Effectiveness  4 


MEASURE  OF  EFFECTIVENESS  5 

jf  DF  CAS  PER  PIECE 

1 4/0/0 
12/1/1 
10/2/2 
B/3/3 
10/3/1 


0%/DF  PROB/DF  100%/DF  100%/N0  DF 
4  SCENARIOS:  MINEFIELDS/DIRECT  FIRE 


Figure  16.  Model  1  Measure  of  Effectiveness  5 


MEASURE  OF  EFFECTIVENESS  6 

TOTAL  #  CAS  PER  PIECE 


4  SCENARIOS;  MINEFIELDS/DIRECT  FIRE 


[Z]  TVO/0 
12/1/1 
10/2/2 
8/5/3 


53  ^o/vi 


Figure  17.  Model  1  Measure  of  Effectiveness  6 


MEASURE  OF  EFFECTIVENESS  7 

%  UNITS  TO  DEFENSE 


4  SCENARIOS:  MINEFIELDS/DIRECT  FIRE 


Figure  18.  Measure  of  Effectiveness  7 


MEASURE  OF  EFFECTIVENESS  8 


UNITS  TO  DEFENSE  IN  BEGINNING  OF  BATTLE 

/  UNITS 

□  iVo/0 
K71  12/1/1 
f7l  10/2/2 

CS  8/3/3 
R~l  10/3/1 


OX/DF  PRQ0/DF  yOOX/OF  100*/N0  OF 
■4  SCENARIOS:  MINEFIELDS/OIRECT  HRE 


UNITS  TO  DEFENSE  EARLY  IN  BATTLE 

I  UNITS 


Pn  14/0/0 

POi  12/1/1 
Z2  ’0/2/2 

S3  3/3/3 
KD  ’0/3/1 


OX/DF  PROB/DF  yCOX/DF  100X/NO  DF 
4  SCENARIOS:  MINEFIELDS/DIRECT  FIRE 


UNITS  TO  DEFENSE  IN  MIDDLE  OF  BATTLE 

#  UMTS 

r~7  14/0/0 

E3  ’2/’/’ 
E2  ’0/2/2 

E3  5/3/3 
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OX/DF  PRO0/OF  100S/DF  100X/N0  OF 
4  SCENARIOS:  MINEFIELDS/OIRECT  FIRE 


UNITS  TO  DEFENSE  LATE  IN  BATTLE 

#  UNITS 


4  SCENARIOS:  MINEFIELDS/DIRECT  FIRE 


Figure  19.  Model  1  Measure  of  Effectiveness  8 


MEASURE  OF  EFFECTIVENESS  9 

AVG  LENGTH  OF  BATTLE 


17^  14/0/0 
12/1/1 
10/2/2 
8/3/3 
10/3/1 


4  SCENARIOS;  MINEFIELDS/DIRECT  FIRE 


Figure  20.  Model  1  Measure  of  Effectiveness  9 


MEASURE  OF  EFFECTIVENESS  10 

AVG  END  RANGE  OF  BATTLE 
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Figure  21.  Model  1  Measure  of  Effectiveness  10 


MEASURE  OF  EFFECTIVENESS  11 

RATE  OF  BATTLE  LOSSES 
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14/0/0 

12/1/1 

10/2/2 

8/3/3 
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Figure  22.  Model  1  Measure  of  Effectiveness  11 


Meas 


MODEL  2  STATISTICS 


Unit  Configuration 

12/1/1  10/2/2 


PROB/DF 

100%/ 
NO  DF 

N/A 

0.098 

(0.054) 

0.241 

(0.102) 

0.403 

(0.134) 

0.241 

(0.102) 

8.540 

(3.134) 

N/A 

64/200 

35/200 

0  0 
4  60 

0  0 
20  15 

1.084 

(0.438) 

0.223 

(0.022) 

0.518 

(0.144) 

0.245 

(0.101) 

PROB/D 


100%/ 
NO  DF 


0.469  0.257 

(0.162)  (0.973) 


4.810 

(1.601) 


6.565 

(2.267) 


91/200  32/200 


0  0  0  0 

6  85  0  32 


1.122  0.219 

(0.297)  (0.027) 


TABLE  7  MODEL  2  STATISTICS 
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MEASURE  OF  EFFECTIVENESS  2 
MODEL  1  VERSUS  MODEL  2 


PROB/OF  100S/NO  DF 


Q  U/0/0 

^  12/1/1/MODEL  1 
^  12/1/1/MODEL  2 


2  SCENARIOS:  MINEFIELDS/DIRECT  FIRE 


%  LOSSES  TO  MINES 


n  14/0/0 
rXl  10/2/2/M0DEL  1 
10/2/2/MODEL  2 


PROB/DF  100%/N0  DF 

2  SCENARIOS;  MINEFIELDS/DIRECT  FIRE 

Figure  24.  Model  1  versus  Model  2 

Measure  of  Effectiveness  2 


MEASURE  OF  EFFECTIVENESS  3 
MODEL  1  VERSUS  MODEL  2 


%  LOSSES  TOTAL 

m  14/0/0 
533  12/1 /I /MODEL  1 
IS^  12/1 /I /MODEL  2 


PROB/DF  100X/N0  DF 

2  SCENARIOS:  MINERELDS/DIRECT  FIRE 


%  LOSSES  TOTAL 
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Figure  25.  Model  1  versus  Model  2 

Measure  of  Effectiveness  3 


MEASURE  OF  EFFECTIVENESS  4 
MODEL  1  VERSUS  MODEL  2 


#  MINE  CAS  PER  PIECE 
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Figure  26.  Model  1  versus  Model  2 

Measure  of  Effectiveness  4 
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MEASURE  OF  EFFECTIVENESS  5 
MODEL  1  VERSUS  MODEL  2 


#  DF  CAS  PER  PIECE 
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Figure  27.  Model  1  versus  Model  2 

Measure  of  Effectiveness  5 
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MEASURE  OF  EFFECTIVENESS  6 
MODEL  1  VERSUS  MODEL  2 


TOTAL  #  CAS  PER  PIECE 

\7~]  14/0/0 
^3  12/1 /I /MODEL  1 
12/1/1/MODEL  2 


PROB/DF  100VNO  DF 

2  SCENARIOS:  MINEFIELCS/DIRECT  FIRE 
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[Z]  14/0/0 

10/2/2/M0DEL  1 
[X]  10/2/2/M0DEL  2 


Figure  28.  Model  1  versus  Model  2 

Measure  of  Effectiveness  6 


MEASURE  OF  EFFECTIVENESS  7 
MODEL  1  VERSUS  MODEL  2 
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0.4  I - 
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Figure  29.  Model  1  versus  Model  2 

Measure  of  Effectiveness  7 
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MEASURE  OF  EFFECTIVENESS  8 
MODEL  1  VERSUS  MODEL  2 


UNITS  TO  DEFENSE  IN  EACH  PHASE  OF  HATTIE 
4  UMTS 
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Figure  30.  Model  1  versus  Model  2 

Measure  of  Effectiveness  8 
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MEASURE  OF  EFFECTIVENESS  9 
MODEL  1  VERSUS  MODEL  2 
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Figure  31.  Model  1  versus  Model  2 

Measure  of  Effectiveness  9 
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MEASURE  OF  EFFECTIVENESS  10 
MODEL  1  VERSUS  MODEL  2 


AVG  END  RANGE  OF  BATTLE 
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Figure  32.  Model  1  versus  Model  2 

Measure  of  Effectiveness  10 


MEASURE  OF  EFFECTIVENESS  11 
MODEL  1  VERSUS  MODEL  2 


RATE  OF  BATTLE  LOSSES 
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Figure  33. 


Model  1  versus  Model  2 
Measure  of  Effectiveness  11 


92 


V.  SUMMARY.  FUTURE  ENHANCEMENTS,  AND  UTILIZATION 


A.  SUMMARY 

The  model,  as  developed,  examines  a  limited  number  of 
different  scenarios,  tactics  and  equipment  configurations. 
The  combinations  examined  are  by  no  means  all  encompassing. 
Continued  analysis  using  the  model  as  developed  will 
provide  answers  to  many  mine/countermine  questions 
concerning  equipment  and  doctrine. 

The  model  is  a  high  resolution  stochastically  based 
simulation  with  a  minimal  amount  of  background  routines  to 
support  the  minefield  breaching  logic.  While  it  will  not 
answer  all  the  questions  concerning  the  basis  of  issue  of 
countermine  equipment,  it  does  improve  the  analyst's 
ability  to  make  decisions  regarding  the  effectiveness  of 
the  mine/countermine  equipment  configurations. 


B.  FUTURE  ENHANCEMENTS 

The  following  additions  or  improvements  to  the  model 
are  recommended: 

1.  Addition  of  indirect  fire  to  suppress  both  forces  and 
allow  smoke  to  be  used  to  obscure  the  breaching  sites 
through  the  minefields. 

2.  Development  of  a  red  movement  network  so  a  blue 
counterattack  scenario  may  be  examined. 

3.  A  better  method  of  controlling  the  breaching 
equipment  during  the  conduct  of  the  breach  is 
required.  At  present  the  equipment  must  stay  in  the 
order  input  in  the  data  file.  Therefore  if  a  unit 
has  two  mineplow  tanks  and  a  mlneroller  tank,  and  if 
the  first  mineplow  clears  a  lane,  the  proofing 
vehicle  would  be  a  mineplow  tank  if  it  was  entered 
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second  in  the  file,  as  opposed  to  the  mineroller  tank 
as  called  for  by  doctrine. 

4.  A  more  accurate  method  of  determining  the  destruction 
of  a  piece  of  breaching  equipment  is  required.  In 
the  simulation,  if  one  side  of  a  mineplow  or 
mineroller  is  rendered  inoperable,  then  the  entire 
system  is  considered  lost.  Additionally,  the 
probability  of  surviving  a  mine  detonation  could  be 
considered  cumulative  in  nature,  where  the 
probability  of  surviving  the  first  mine  detonation  to 
a  breaching  system  may  be  higher  than  surviving  the 
second  etc. 

5.  The  assumption  of  perfect  knowledge  concerning  the 
extent  of  the  minefield  when  it  is  identified  does 
not  accurately  model  the  real  world.  A  method  of 
dealing  with  unclear  or  unknown  boundaries  of  an 
obstacle  must  be  developed  to  better  simulate  the 
actions  of  a  unit  encountering  the  minefield. 


C.  UTILIZATION 

The  model  as  it  currently  exists  may  be  used  to 
develop,  examine  and  verify  tactics.  The  placement  of 
equipment  within  a  formation,  how  far  in  the  lead  the 
mineroller  should  be  placed  and  other  tactics  may  be 
examined.  Formations  may  dictate  the  number  of  breaching 
assets  required.  If  the  breaching  equipment  is  in  the 
forward  platoons  but  not  employed,  they  may  encounter  a 
minefield  and  be  rendered  inoperative  prior  to  commencement 
of  breaching  operations.  By  changing  the  depths  of  the 
minefield,  problems  concerning  the  angle  of  attack  on  an 
obstacle  may  be  examined. 

The  output  generated  by  this  model  provides  the 
appropriate  information  in  the  proper  format  required  for 
more  analytical  models.  One  such  model  is  a  Semi-Markov 


Renewal  Process  which  aggregates  high  resolution  data  Into 
various  transition  matrices.  [Ref.  13] 

Therefore,  not  only  Is  the  model  useful  as  developed  to 
Investigate  the  Issuance  of  countermine  equipment,  but  may 
also  be  used  In  all  areas  concerning  minefields  and  the 
tactics  used  to  counter  the  obstacle. 


APPENDIX  A  DEFINITION  OF  MODEL  ONE  VARIABLES 

The  variables  used  In  Model  1  are  defined  below.  All 
variables  are  either  Integer  or  single  precision.  The  only 
double  precision  variable  used  In  the  model  was  the  seed 
for  the  random  number  generator. 


AAA 

ACTIVEl, ACTIVE2 

ANGLE 

ARC 

AVE 

BEHIND 

BLUECODE, REDCODE 


BLUEDETECTl , 

REDDETECT1,2 


—  Speed  adjustment  factor  to 
maintain  movement  control . 

—  The  first  2  elements  of  a  unit 
entering  a  minefield;  they  are 
the  candidates  for  detonating  a 
mine. 

—  Heading  In  radians  of  the  arcs  In 
the  network. 

—  Line  connecting  2  nodes, 
supporting  the  movement  of  the 
units. 

—  Avenue  of  approach,  consisting  of 
a  series  of  arcs  from  the 
movement  network. 

—  Binary  variable;  It  Is  1  when  AAA 

Is  greater  than  1;  0  otherwise. 

—  Status  code  of  the  unit;  for  the 
blue  force  It  may  be;  0- 
defenslve  posture,  1-assault 
formation,  2-breachlng  formation. 
For  the  red  force.  If  It  equals  0 
the  unit  Is  not  combat 
effective. 


—  The  numerical  Identifier  of  the 
elements  on  the  flrer's  detection 
list. 


BLUENEGAGE , REDENGAGE  --  Number  of  elements  In  one  force 

detecting  or  engaging  an  element 
of  the  opposing  force.  Up  to 
four  blue  elements  may 
detect/engage  a  single  red 
element  while  only  two  red 
elements  may  detect  a  single  blue 
element. 
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I 


I 


I 


BLUEPDET, REDPDET 


BLUERMAX, RMAX 


BLUESTATUS , REDSTATUS 


BLUEXIPOS , BLUEYIPOS 


--  Probability  of  detecting  an 
opposing  element  using  the 
detection  rate,  DETRATE. 

—  Maximum  effective  engagement 
ranges  for  the  weapons  systems; 
user  input  variables. 

—  Indicates  the  current  status  of 
an  element,  the  status  may  be:  0- 
element  is  dead,  1-element  is  in 
the  detecting  phase,  2-element  is 
in  the  firing  phase. 

—  Actual  x,y  coordinates  of 
elements  in  each  blue  unit. 


BLUEX0FF_, BLUEYOFF 

BLUEXPOS , BLUEYPOS 

BPHITS,BPKILL 

BULL1,BULL2 

BVEHORDER 

BYPASSl, BYPASS 2 

CLOCK 


—  These  values  represent  the  offset 
distances  in  the  x  direction  and 
y  direction  from  the  control 
vehicle.  There  is  an  x  distance 
and  a  y  distance  for  each  of  the 
three  formations  and  are  user 
input . 

--  Actual  x,y  coordinates  of  the 
control  vehicle  in  each  of  the 
blue  units. 

—  The  probabilities  associated  with 
hitting  and  killing  a  red  target 
using  the  range  to  delineate  the 
probabilities . 

—  Status  indicators  to  determine  if 
a  unit  is  bulling  through  a 
minefield. 

—  An  array  which  stores  the  order 
of  the  units  as  read  from  the 
data  file. 

—  Status  indicators  to  determine  if 
a  unit  is  bypassing  a  minefield. 

--  Keeps  track  of  the  time  of 
battle. 

--  Binary  variable  used  in 
conjunction  with  the  AAA 
variable. 


i 


i 

m 


n 


! 


I 


I 


CLOSE 


CODED 


CV 

DELX,DELY 

DENSMINEl , DENSMINE2 

DEPMINEl , DEPMINE2 

DETRATE 

DFKILL 

DFTYPE 

DIST 

DISTANCE 

DISTDETl , DISTDET2 


—  Records  the  time  a  unit  goes  to  a 
defensive  posture. 

—  Crossing  velocity;  used  in  the 
detection  module  and  represents 
the  component  of  movement 
perpendicular  to  the  target- 
obseirver  line-of-sight . 

—  Represents  the  distance  in  the  x 
and  y  directions  the  control 
vehicle  moves  during  a  single 
time  step. 

—  Represents  the  densities  of  the 
near  and  far  minefields;  it  is 
user  input. 

—  The  depth  of  a  minefield,  based 
on  the  maximum  and  minimum  depth 
parameters  and  a  Monte  Carlo 
draw. 

—  The  rate  at  which  a  detection  can 
occur,  used  in  calculation  of 
the  probability  of  detecting  a 
vehicle. 

--  Counter  to  keep  track  of  the 
number  of  direct  fire  kills  per 
repetition. 

—  Counter  to  keep  track  of  the 
total  number  of  direct  fire 
kills  by  type  over  each 
repetition. 

—  Actual  length  of  each  arc;  user 
input  as  part  of  the  network. 

—  Cumulative  distance  traveled 
along  an  arc. 

—  Represents  the  distance  to  next 
detonation  of  a  mine;  used  in 
both  the  initial  entry  to  a 
minefield  routine  and  during 
breaching  operations. 


ENTRYl , ENTRY2 


—  Variables  used  to  determine  when 
a  minefield  has  been  entered. 


EQUIP 


HEAD 

HEIGHT, RHEIGHT 

LAG 

LOG 

MAXDEPTHl , MAXDEPTH2 
MINDEPTHl , MINDEPTH2 
MINE1,MINE2 
MINEDETl , MINEDET2 

MINEKILL 

MINEPK 

MOVE 

NARC 

NNODE 

NODE 

NUMBLUE,NUMRED 


—  Used  in  the  Unit  Status 
subroutine  to  aid  in  tabulating 
types  of  equipment  in  the  unit. 

—  Head  of  an  arc;  a  node  number. 

—  Represents  the  actual  heights  of 
the  equipment  in  the  various 
units;  user  input. 

—  User  input  value  representing  the 
maximum  range  deviation  in  the 
assaulting  units. 

—  Represents  the  current  arc 
location  of  the  unit. 

--  User  input;  the  maximum  depths  of 
minefields  1  and  2. 

—  User  input;  the  minimum  depths  of 
minefields  1  and  2. 

—  User  input;  the  arcs  on  which  the 
minefields  located. 

--  User  input;  the  probabilities 
associated  with  detecting  the 
presence  of  a  minefield. 

--  Counter  to  keep  track  of  the 
number  of  kills  due  to  mine 
detonations  per  repetition. 

—  User  input;  the  probability  that 
a  mine  kills  a  tank  given 
detonation. 

--  Cumulative  distance  indicator 
that  keeps  track  of  the  distance 
a  unit  has  moved  through  a 
minefield. 

—  Number  of  arcs  in  the  network. 

--  Number  of  nodes  in  the  network. 

--  Specific  number  of  a  node. 

--  Number  of  blue  elements  per  unit 
and  the  total  number  of  red 
elements. 
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NUNIT 


PDET0NAT4 

PCLEAR4,PCLEAR5 

PSURVIV4, PSURVIV5 
PDETTNK4 , PDETTNK5 

PMINE1,PMINE2 

PRCNTEFFB, PRCNTEFFR 

RANGE 

REDX,REDY 

REDXPOS , REDYPOS 

RNGADJ 

RNGAPP 


—  Number  of  blue  units  in  the 
simulation. 

—  User  input;  the  probability  of  a 
mine  detonating  when  cleared  by  a 
breaching  device. 

—  Probabilities  of  a  breaching 
device  clearing  a  mine  given  an 
encounter . 

--  Probabilities  of  surviving  an 
encounter  with  a  mine. 

—  The  cumulative  probability  of 
clearing  a  mine,  either  by  the 
breaching  device  or  detonation 
by  the  carrier. 

—  User  input;  the  probabilities  of 
a  minefield  being  emplaced,  also 
interpreted  the  probabilities  of 
encountering  a  minefield  given  it 
is  emplaced. 

—  Used  in  the  Unit  Status 
subroutine,  they  keep  track  of 
the  combat  effectiveness  of  the 
units. 

—  Range  is  calculated  throughout 
the  simulation  and  is  the 
distance  from  blue  element  to  red 
element. 

—  Represents  the  center  of  mass  of 
the  red  position  in  the  x,y 
plane. 

—  User  input;  the  locations  of  the 
red  elements  in  the  x,y  plane. 

—  The  calculated  adjusted  range  to 
a  target  based  on  the  range 
adjustment  factors  input  into  the 
detection  model. 

—  The  calculated  apparent  range  to 
a  target  based  on  the  percent  of 
the  target  that  is  visible  to  the 
observer. 
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RNGDET1,RNGDET2 


RNGMAX, RNGMIN 


RPLOOK 


SPEED 


STATMINl , STATMIN2 


TAU 


RPHITM,RPKILL 


PHIT, PRILL 


RRAF,RAF 


TDFKILL , TMINEKILL 

I 


I 


—  Ranges  to  the  detected  elements 
In  the  blue  force;  used  to 
determine  which  vehicles  go  on 
the  red  elements'  detected  list. 

—  At  any  given  time  step  the  blue 

units  are  In  the  Interval 
[RNGMIN,  RNGMAX]  which  Is  the  l| 

distance  from  the  enemy. 

—  User  Input;  the  probability  that 
a  red  element  Is  looking  In  the 
direction  of  the  target. 

—  User  Input;  the  maximum  speed 
each  vehicle  type  is  able  to 
maintain  on  each  arc  based  on 
terrain  characteristics. 

—  Binary  variables;  used  to  ■ 

Indicate  the  status  of 
minefields. 

—  Terrain  complexity  code  ranging 

from  1  to  7;  used  in  the 
probability  of  detection  | 

equation. 

—  The  probabilities  associated  with 

hitting  and  killing  a  blue  target 
using  range  to  delineate  the 
probabilities.  | 

--  The  actual  values  calculated  from 
the  table  look-up  which  are  then 
compared  to  a  random  number  draw. 

—  Range  adjustment  factors  for  the 
red  and  blue  forces;  used  to 
calculated  adjusted  ranges  for 
each  target. 

—  Total  number  of  kills  over  the  50 
repetitions  due  to  direct  fire 
and  mines,  respectively. 
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TPLOWKILL , TROLLKILL 


TPLOWBRCHKILL, 

TROLLBRCHKILL 

TKILL 

TTKILL 

UNIT 

UNITSPD 

VEHTYPE, RVEHTYP 

WIDTH 

XNODE,YNODE 

XOFFPLT,YOFFPLT 


—  Total  number  of  mlneplows  and 
minerollers  killed  over  the  50 
repetitions  due  to  mine 
detonations.  Thess  represent 
only  the  breaching  device  being 
destroyed,  not  the  carrier. 


—  Total  number  of  mlneplow 
carriers  and  mlneroller  carriers 
killed  by  mine  detonations  over 
the  50  repetitions  while 
conducting  breaching  operations. 

—  Total  number  of  kills  due  to  all 
causes  over  a  single  repetition. 

—  A  tabulating  variable  used  In  the 
output  file,  representing  the 
total  number  of  kills  of  all 
types  over  fifty  repetitions. 

—  Counter  to  track  which  Is  the 
current  unit;  the  simulation 
will  allow  up  to  10  units. 

—  The  speed  the  unit  moves  based  on 
formation,  location  and 
equipment . 

—  These  variables  are  coded  for  the 
type  of  vehicles  in  the  units. 
The  blue  force  has  five  types  as 
discussed  In  Chapter  3  while  the 
red  force  has  two  vehicle  types; 
a  BMP  and  a  tank. 

—  The  width  is  the  effective  width 
of  the  vehicle  entering  a 
minefield  and  Is  used  In  the 
calculation  of  the  distance  to  a 
mine  encounter. 

—  These  values  represent  the  X  and 
Y  grid  coordinates  of  the  nodes 
In  the  network. 

—  The  x,y  offsets  used  in  the 
OFFSET  subroutine  to  calculate 
the  actual  x,y  coordinates. 
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APPENDIX  B 


COMPUTER  PROGRAM  LISTING 


103 


X  SIMULATION  MAIN  PROGRAM 

xxxxxxxxxxxxxxxxxxx  VARIABLE  DECLARATION  xxxxxxxxxxxxxxxxxxxxx 

1  INTEGER  TAIL, HEAD, NODE, NNODE,ARC,BLUECODE,REDCODE,DEF 

2  INTEGER  AVE, START, NUNIT,L0C,NUMRED,REDENGAGE,STATMIN1,ENTRY1 

3  INTEGER  NARC,ISTART, LAST, UNIT, RED, REDSTATUS,VEHTYPE,RVEHTYP 

4  INTEGER  BLUESTATUS, ELEMENT, POSITION, NUMBLUE, CLOSE, BEHIND, REP 

5  INTEGER  REDDETECT1,REDDETECT2,BLUEENGAGE,BLUEDETECT1,MINE1 

6  INTEGER  BVEH0RDER,BULL1,BULL2,BYPASS1,MINE2,STATMIN2,ENTRY2 

7  INTEGER  BYPASS2,MINEKILL,DFKILL,R0LLICILL,PL0WKILL,R0LLBRCHKILL 

«  INTEGER  TMINEKILL,TDFKILL,TROLLKILL,TPLOWKILL,TROLLBRCHKILL 

9  INTEGER  PLOWBRCHKILL,TPLOWBRCHKILL,TKILL,TTKILL, DFTYPE,MTYPE 

10  REAL  WIDTH, DIST, ANGLE, XNODE,YNODE, CLOCK, SP, BLUEXOFFl , BLUEYOFFl 

11  REAL  BLUEX0FF2,BLUEY0FF2,BLUEX1P0S,BLUEY1P0S,REDXP0S,REDYP0S 

12  REAL  BLUEXOFFO,BLUEYOFFO,MINDEPTH1,MAXDEPTH1,RNG, CODED 

13  REAL  DELX, DELY, TRAVEL, SPEED, DISTANCE, CV, UNITSPD, RHEIGHT, RRAF 

14  REAL  RPLOOK,REDX,REDY,BLUEXPOS,BLUEYPOS,LAG,AAA,RMAX 

15  REAL  DENSMINEl , PMINEl , DISTDETl , DEPMINEl ,MINDEPTH2, MAXDEPTH2 

16  REAL  BLUERMAX,DENSMINE2,PMINE2,DISTDET2,DEPMINE2 

17  REAL  RPHITS,RPHITM,RPK1LL,BPHITS,BPKILL 

18  REALX8  DSEED 

19  DIMENSION  TAIL(150),HEAD(150),TIMEC150),AVEC10,30),BULL1(10) 

20  DIMENSION  FLOW(100),DIST(100),WIDTH(100),ISTART(10),BYPASS1(10) 

21  DIMENSION  ARC(100),SP(100),ANGLE(100) ,DISTANCE(10),CV(10) 

22  DIMENSION  NODE(150),XNODE(150),YNODE(150),BLUEDETECT1(10,20} 

23  DIMENSION  BLUEXPOS(20),BLUEYPOS(20) , RHEIGHT(30) , RRAF(30 ) , RMAX(30) 

24  DIMENSION  SPEED(10,80),BLUEYOFF1(20),BLUEXOFF1(20),LOC(10) 

25  DIMENSION  BLUEXOFF2(20),BLUEYOFF2(20),RVEHTYP(30),BLUEC0DE(10) 

26  DIMENSION  BLUEXOFF0(2O),BLUEYOFF0(20),STATMINl(10),MINEl(10} 

27  DIMENSION  BLUEX1POS(10,20),BLUEY1POS(10,20),BLUESTATUS(10,20) 

28  DIMENSION  REDXPOS(50),REDYPOS(50),RPL0OK(10,50),UNITSPDCin) 

29  DIMENSION  RED( 50 ) , REDSTATUS( 30 ) , VEHTYPE( 10 , 20 ) , REDENGAGEC 100) 

30  DIMENSION  REDDETECTl (30) ,REDDETECT2(S0) , BLUEENGAGEC30) ,MINE2( 10) 

31  DIMENSION  PMINE2< 10) , DISTDET2( 10, 100) ,DEPMINE2(10) , ENTRY2(10) 

32  DIMENSION  PMINEK 10)  ,DISTDET1(10, 100) ,  DEPMINEKIO) ,  ENTRYl  ( 10) 

33  DIMENSION  RPHITS(10),RPHITM(10),RPKILL(10),BPHITS(10),BPKILL(10) 

34  DIMENSION  BVEHORDER(10,20),RNG(20),STATMIN2(10),BYPASS2(10) 

35  DIMENSION  BULL2(10),MINEKILL(100),DFKILL(100),R0LLKILL(100) 

36  DIMENSION  PLOWKILL(100),ROLLBRCHKILL(100),PLOWBRCHKILL(100) 

37  DIMENSION  BLUERMAX(10,20),DFTYPE(20),MTYPE(20),CODEO(10),DEF(10) 

K 


38 

OPEN 

(UNIT 

S 

54 

P 

FILE 

S 

’SIMUL') 

39 

OPEN 

(UNIT 

s 

44 

$ 

FILE 

5 

•RESULTS') 

40 

OPEN 

(UNIT 

s 

34 

9 

FILE 

S 

•OUTPUT') 

41 

OPEN 

(UNIT 

s 

24 

f 

FILE 

S 

•MINETIME') 

42 

OPEN 

(UNIT 

s 

23 

9 

FILE 

S 

•TIMEMINE') 

xxxxxxxxxxxKxxxxxxxxxx  SET  INITIAL  OPTIONS  xxxxxxxxxxxxxxxxxxxxxxxxxx 


X 


X 

SET  START  NODE 

43 

X 

START 

=  1 

SET  LAST  NODE 

44 

X 

LAST 

=  29 

TOTAL  NUMBER  OF 

ARCS  IN  THE  SECTOR 

45 

X 

NARC 

=  31 

TOTAL  NUMBER  OF 

NODES  IN  THE  SECTOR 

46 

NNODE 

=  29 

* 

X  NUMBER  OF  AVENUES  OF  APPROACH 
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47  NUNIT  =  4 

X  NUMBER  OF  RED  ELEMENTS 

48  NUNRED  =13 

X  NUMBER  OF  BLUE  ELEMENTS  IN  EACH  UNIT 

49  NUMBLUE=14 

X  SET  INITIAL  CONDITIONS 
XSET  RANDOM  NUMBER  SEED 

50  DSEED=1029395.D0 


XSET  TERRAIN  CODE 
51  TAU  =  3.5 


X 

xxxxxxxxxxxxx  READ  DATA  FROM  DATA  FILES  xxxxxxxxxxxxxxxxxxxxxxxx 

X 

52  READ( 1,100)  (ARC(I),TAIL(I),HEAD(I),DIST(I),ANGLE(I),I=1,NARC) 

53  100  F0RMAT(2X,I3,3X,I2,3X,I2,4X,F4.2,3X,F5.3) 

54  READ(2.200)  (N0DE(I},XN0DE(I),YN0DE(I),I=1,NN0DE) 

55  200  F0RMAT(2X,I3,2X,F5.0,1X,F5.0) 

56  READ(3,300)((AVE(K,I),K=1,4),I=1,13) 

57  300  F0RMAT(2X,I3,2X,I3,2X,I3,2X,I3) 

58  READ(4,400)((SPEED(K,I),IC=1,5),I  =  1,NARC) 

59  400  FORMAT<2X,5F4.0) 

60  READ(9,500)  (BLUEXOFFOC I ) ,BLUEY0FF0( I) , 1=1 , NUMBLUE) 

61  READ(10,500)  (BLUEXOFFKI) , BLUEYOFFK I) ,  1  =  1 , NUMBLUE) 

62  READ(11,500)  (BLUEX0FF2(I),BLUEY0FF2(I), 1=1, NUMBLUE) 

63  500  F0RMAT(2X,F5.2,2X,F5.2) 

64  READ<17,550)  (BPHITS(I),BPKILL(I),I=1,8) 

65  550  F0RMATC2X,F4.2,2X,F4.2) 

66  READ(12,600)  (RED(I),REDXP0S(I),REDYP0S(I),I=1,NUMRED) 

67  600  FORMAT  (2X,I2,2X,F5.1,2X,F5.1) 

68  READ(13,700)  ((RPL00K(K,I),K=1,NUNIT),I=1,NUMRED) 

69  700  F0RMAT(2X,4F6.2) 

70  READ(14,800)  (( BVEHORDER(K, I ), IC=1 , NUNIT) , 1  =  1 , NUMBLUE) 

71  800  F0RMAT(2X,I1,2X,I1,2X,I1,2X,I1) 

72  READ( 15,900)  CRVEHTYP< I ) , RHEIGHTC I ) , RRAFC I ) , RMAXC I ) , 1=1 , NUMRED) 

73  900  F0RMAT(2X,I1,2X,F3.1,2X,F3.1,2X,F3.1) 

74  READ(16,950)  (RPHITS(I),RPHITM(I),RPICILLCI),I=1,9) 

75  950  F0RMAT(2X,F4.2,2X,F4.2,2X,F4.2) 


76  TROLLBRCHKILL=0 

77  TPLOWBRCHKILL=0 

78  TMINEKILL=0 

79  TDFKILL=0 

80  TROLLK1LL=0 

81  TPL0HKILL=0 
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82 


DO  181  REP=1,50 


83  HRITE(54,928)  REP 

84  928  FORMAT ( 'KJCXKKXKXK*  REPITITION  NUMBER  SIS'  XXXXXXKXXX' ) 

KXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 
X  START  SIMULATION 


85 

RNGMIN  s  20.0 

86 

MINEKILL(REP)=0 

87 

DFKILLCREP)=0 

88 

DFTYPE(1)=0 

89 

DFTYPE(2)=0 

90 

DFTYPE(3)=0 

91 

DFTYPE(4)»0 

92 

DFTYPE(5)=0 

93 

MTYPE(1)=0 

94 

MTYPEC2)=0 

95 

MTYPEC3)=0 

96 

PL0WKILL(REP)=0 

97 

ROLLKILL(REP)=0 

98 

R0LLBRCHKILL(REP)=0 

99 

PLONBRCHKILL(REP}=0 

100 

CLOCK  =0.0 

101 

REDX=XN0DE(26) 

102 

REDY=YN0DE(26) 

103 

REOCODE  =  1 

XMINEFIELD  NUMBER  1  LOCATIONS 

104  MINE1(1)=10 

105  MINE1(2)=9 

106  MINE1(3)=17 

107  MINE1(4)=22 

108  MINDEPTH1=150 

109  MAXDEPTH1=300 

110  DENSMINE1=.003 

111  PMINE1(1)=0.70 

112  PMINE1(2)=0.70 

113  PMI(IE1C3)=0.70 

114  PMIHE1(4)=0.70 

XMINEFIELD  NUMBER  2  LOCATIONS 

115  MINE2(11=13 

116  MINE2(2)=12 

117  MINE2(3)=26 

118  MINE2(4}324 

119  MINDEPTH2=200 

120  MAXDEPTH2=300 

121  0ENSMINE2-.02 

122  PMINE2(1)=0.90 

123  PMINE2(2)=0.90 

124  PMINE2(3)=0.90 

125  PMINE2(4)=0.90 


126 

127 


DO  40  UNIT=1,NUNIT 
BLUECODE(UNIT)  -  1 
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128 

129 

130 

131 

132 

133 

134 

135 

136 

137 

138 

139 

140 

141 

142 

143 

144 

145 

146 

147 


DEF(UNIT)*0 

C0DE0(UHIT)*0 

ISTART(UNIT)=1 

L0C{UNIT)=AVE(UNIT,1) 

BLUEXPOS(UNIT)  =  XNODE(TAIL(LOC(UNIT) ) ) 
BLUEYPOS(UNIT)  =  YNODECTAILCLOCCUNIT))) 
DISTANCE(UNIT)=0.0 
UNITSPD(UNIT)=0.0 
STATMIN1(UNIT)=0 
STATMIN2(UNIT)=0 
ENTRY1(UNIT)=0 
ENTRY2(UNIT)=0 
BULL1(UNIT)=0 
BYPASSl(UNin  =  0 
BULL2(UNIT)=0 
BYPASS2(UNIT)=0 
DO  47  POSITION=l,NUMBLUE 

VEHTYPE(UN1T,P0SITI0M)=BVEH0RDER(UNIT; POSITION) 

BLUESTATUS(UNIT,POSITION)=l 

REDENGAGE((NUMBLUEX(UNIT-1))+POSITION)=0 


XXXXXXXXXXXXXXBLUE  MAX  ENGAGEMENT  RANGExxxxxxxxxxxxxxxx 

148  BLUERMAX(UNIT,POSITION)=  3.0 

149  47  CONTINUE 

150  40  CONTINUE 

151  DO  13  ELEMENT=1,NUMRED 

152  REDSTATUS(ELEMENT)=1 

153  BLUEENGAGE(ELEMENT)=0 

154  13  CONTINUE 

XXXKXXXX  SIMULATION  START  xxxxxxxxxxxxxxxx 


155 

X 

X 

X 


CALL  MINESETUP  (UNIT,NUNIT,DSEED,PMINE1, 

STATMINl ,MINDEPTH1 , MAXDEPTHl , DEPMINEl , DENSMINEl , 
DISTDET1,PMINE2,STATMIN2,MINDEPTH2,MAXDEPTH2, 
DEPMINE2, DENSMINE2, DISTDET2) 


156  DO  20  J=l,200 

157  CL0CK=CL0CK+.5 


158  CALL  UNITSTATUS(BLUECODE,REDCODE, UNIT, NUNIT, POSITION, NUMBLUE, 

X  BLUESTATUS,REDSTATUS,NUMRED, ELEMENT, VEHTYPE, CLOCK, REP, 

X  RNGMIN) 

X  CHECKS  TO  DETERMINE  IF  BATTLE  TERMINATION  CRITERIA  HAS  BEEN  MET 


159 

160 


X 


IF  (REDCODE  .EQ.  0)  GO  TO  179 
CALL  LOCATION  (  LAG, UNIT, NUHIT,BLUEXPOS,BLUEYPOS,RNG, 

RNGMIN, REDX,REDY, AAA, CLOSE, BEHIND, BLUECODE) 


161 

162 


163 


IFCRNGMIN  .LT.  .250)  THEN 

CALL  UNITSTATUSL BLUECODE, REDCODE, UNIT, NUNIT, POSITION, NUMBLUE, 
X  BLUESTATUS,REDSTATUS;NUMRED, ELEMENT, VEHTYPE, CLOCK, REP, 

X  RNGMIN) 

END  IF 
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164 


IFCRNGMIN  .LT.  .250)  GO  TO  179 


X  ENTER  MOVEMENT  ROUTINE 
165  DO  30  UNIT»1,NUNIT 


XCHECK  TO 

166 

167 

168 

169 

170 

171 

172 

173 


SEE  IF  UNIT  HAS  ENTERED  MINEFIELD;  30  SECOND  MOVEMENT  DELAY 
IF(ENTRYICUNIT)  .EQ.  1)  THEN 
ENTRY1(UNIT)=2 
GO  TO  30 
END  IF 

IFCENTRY2(UNIT)  .EQ.  1)  THEN 
ENTRY2<UNIT)=2 
GO  TO  30 
END  IF 


174 


175  30 


CALL  MOVl  (LOC, TAIL, XNODE,YNODE, SPEED, TRAVEL, ANGLE, AVE,DIST, 
*  NODE, ISTART, DISTANCE, BLUEXPOS, BLUEYPOS, CLOCK, UNIT, 

»  BLUEXOFF1,BLUEYOFF1,BLUEXOFF2,BLUEYOFF2,ENTRY1, 

X  BLUEX1P0S,BLUEY1P0S,UNITSPD,NUMBLUE,VEHTYPE,AAA, 

X  CLOSE, BEHIND, BLUECODE,BLUEXOFFO,BLUEYOFFO,DEPMINE1, 

X  MINEl , STATMINl , DSEED, BLUESTATUS , DISTDETl , REDX, REDY , 

X  BLUEDETECTl ,RNG, BULLl, BYPASSl, ENTRY2, DEPMINE2,MINE2, 

X  STATMIN2, DISTDET2, BULL2, BYPASS2,MINEKILL , ROLLKILL , 

X  PLOWKILL,ROLLBRCHKILL,PLOWBRCHKILL,REP,MTYPE) 

CONTINUE 


X  RED  DETECT/FIRE  ROUTINE  ENTERED 

176  DO  43  ELEMENT=1,NUMRED 

177  IF  (REDSTATUS(ELEMENT)  .EQ.  0)  THEN 

178  GO  TO  43 

179  ELSE  IF  (REDSTATUS(ELEMENT)  .EQ.  2)  THEN 


180 


181 

182 


CALL  REDFIRECREDSTATUS, ELEMENT, REDENGAGE, BLUESTATUS, UNIT, 

X  POSITION, NUMBLUE,REDXPOS,REDYPOS,NUNIT,VEHTYPE, 

X  REDDETECT1,REDDETECT2,BLUEX1P0S,BLUEY1P0S, DSEED, CLOCK, 

X  RVEHTYP,RPHITS,RPHITM,RPKILL,DFKILL,REP,DFTYPE) 

GO  TO  43 
END  IF 


183 


CALL  REDDETECT  (REDXPOS,REDYPOS, BLUEXPOS, BLUEYPOS. 

X  BLUEX1POS,BLUEY1POS,NUNIT, REDENGAGE, BLUESTATUS, 

X  ANGLE, UNIT, UNITSPD, CLOCK, LOC, CV.NUMRED.NUMBLUE, 

X  REDX, REDY, RED, RPLOOK.REDSTATUS, DSEED, VEHTYPE, 

X  REDDETECTl , REDDETECT2, EL  EMENT, POSITION, TAU, RVEHTYP, 

X  BLUECODE.RMAX) 


184  43  CONTINUE 


185 

186 

187 

188 

189 

190 

191 


X  BLUE  DETECT/FIRE  ROUTINE  ENTERED 
DO  63  UNIT-1, NUNIT 

DO  69  P0SITI0N=1,NUMBLUE 
IF  (BLUESTATUSCUNIT, POSITION)  .EQ.  0)  THEN 
GO  TO  69 

ELSE  IF  (VEHTYPE(UNIT, POSITION)  .EQ.  4  .OR. 

X  VEHTYPELUNIT, POSITION)  .EQ.  5)  THEN 

GO  TO  69 

ELSE  IF  (BLUESTATUSCUNIT, POSITION)  .EQ.  2)  THEN 
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196  69 

197  63 


CALL  BLUEFIRECREDSTATUS, ELEMENT, BLUEENGAGE, BLUESTATUS, UNIT, 

*  POSITION, REDXPOS, REDYPOS, RVEHTYP, 

*  BLUEDETECT1,BLUEX1P0S,BLUEY1P0S,DSEED, 

K  CLOCK, BPHITS,BPKILL) 

GO  TO  69 

END  IF 

CALL  BLUEDETECT  (REDXPOS, REDYPOS, BLUEX1P0S,BLUEY1P0S, 

«  BLUEENGAGE,BLUESTATUS,REDSTATUS,DSEED, UNIT, CLOCK, NUMRED, 

*  BLUEDETECTl , EL  EMENT, POSITION, TAU, RVEHTYP , RHEIGHT , RRAF, 

*  BLUERMAX) 

CONTINUE 

CONTINUE 


XCHECK  TO  SEE  TIME  UNIT  GOES  TO  DEFENSIVE  POSTURE 

198  DO  159  UNIT=1,NUNIT 

199  IF  (BLUECODE(UNIT)  .EQ.  0  .AND.  DEF(UNIT)  .EQ.  0)  THEN 

200  CODEO(UNIT)  =  CLOCK 

201  DEF(UNIT)  =  1 

202  END  IF 

203  159  CONTINUE 

204  20  CONTINUE 

*  RUNNING  TOTAL  OF  LOSSES 

205  179  TDFKILL=TDFKILL+DFKILL(REP) 

206  TMIHEKILL=THINEKILL+MINEKILLCREP) 

207  TROLLKILL=TROLLKILL+ROLLKILL(REP) 

208  TPLOHKILL=TPLOWKILL+PLOWXILL(REP) 

209  TROLLBRCHKILL=TROLLBRCHKILL+ROLLBRCHKILL(REP) 

210  TPLOWBRCHKILL=TPLOWBRCHKILL+PLOWBRCHKILL(REP) 

211  TKILL»DFKILL(REP)+MINEKILL(REP)+ROLLBRCHKILL(REP)+ 

X  PLOWBRCHKILL(REP) 

212  WRITE(44,338)  DFKILL(REP),DFTYPE(1), (DFTYPE(2)+DFTYPE(4)), 

*  (DFTYPE(3)+DFTYPEC5)),R0LLKILLCREP),PL0WKILL(REP), 

X  MINEKILL(REP),MTYPE(1),MTYPE(2),MTYPE(3), 

X  PLOWBRCHKILLC REP), ROLLBRCHKILLC REP), TKILL, CLOCK, RNGMIN 

213  338  F0RMAT(I2, '/ME,  »/M2,  •/•,I2,1X,I2,4X,I2,3X,I2, 

X  12, V',I2, •/•,I2,4X,I2,7X,I2,6X,I3,4X,F4.1,2X,F6.3) 

214  WRITEC34,377)  DFKILL(REP),DFTYPE(1), (DFTYPE(2)+DFTYPE(4)), 

X  (DFTYPE(3)+DFTYPE(5)),R0LLKILL(REP),PL0NKILL(REP), 

X  MINEKILL(REP),MTYPE(1),MTYPE(2),MTYPE(3), 

X  PLOWBRCHKILLC REP), ROLLBRCHKILL( REP), TKILL, CLOCK, RNGMIN 

215  377  F0RMAT(2X,13I4,2X,F4.1,2X,F5.3) 

216  WRITE(24,577)  STATMIN1(1),STATMIN2(1),CODEO(1), 

X  STATMIN1(2),STATMIN2(2),CODEO(2), 

X  STATMIN1(3),STATMIN2(3),CODEO(3), 

X  STATMIN1(4),STATMIN2(4),CODEO(4),CLOCK 

217  HRITE(23,577)  STATMIH1C1),STATMIN2(1),CODEOC1), 

X  STATMIN1(2),STATMIN2(2),C0DE0(2), 

X  STATMI N1 ( 3 ) , STATMI N2( 3 ) , CODEO ( 3 ) , 

X  •5TATMIN1(4),STATMIN2(4),C0DE0(4), CLOCK 

218  577  F0RMAT(2X,2I4,F5.1,2X,2I4,F5.1,2X,2I4,F5.1,2X,2I4,F5.1,2X,F5.1) 


215  377 

216 


218  577 


219  181  CONTINUE 
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220 


TTKILL=TDFKILL+TMINEKILL+TROLLBRCHKILL+TPLOWBRCHKILL 


221 

222  333 

223 

224  334 

225 


K 


X 

226  335 


WRITE(44  333) 

FORMAK 'TOTAL  NUMBER  OF  KILLS  BY  CATEGORY') 

WRITE(44  334) 

FORMATCDIRECTFIRE  ROLL  PLOW  MINE  PLOWCARRIER  ', 

'  ROLLCARRIER  TOTALKILLS') 

WRITE(44,335)  TDFKILL,TROLLKILL,TPLOWKILL,TMINEKILL, 

TPLOWBRCHKILL,TROLLBRCHKILL,TTKILL 

F0RMAT(5X,I3,4X,I3,3X,I3,3X,I3,7X,I3,11X,I3,11X,I3) 


227  STOP 

228  END 

XXXXKXXXXXXXXXKXXKXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXKXXXXXXXXXX 


xxxxxxxxxxxxxxxx  MINESETUP  xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

229  SUBROUTINE  MINESETUP  (UNIT,NUNIT,DSEED,PMINE1, 

X  STATMIMI .MIMDEPTHl , MAXDEPTHl , DEPMINEl , DENSMIHEl , 

X  DISTDETI,PMINE2,STATMIN2,MINDEPTH2,MAXDEPTH2. 

X  DEPMINE2,DENSMINE2,DISTDET2) 

230  INTEGER  UNIT, NUNIT,STATMINI,STATMIN2, PACE 

231  REAL  RNDMINE,PMINE1,MINDEPTH1, MAXDEPTHl, DEPMINEl, DENSMINEl 

232  REAL  PMINE2,MINDEPTH2,MAXDEPTH2, DEPMINE2, DENSMINE2 

233  REAL  DISTDET1,DISTDET2, WIDTH 

234  REALX8  DSEED 

235  DIMENSION  RNDMINE(IOO) ,PMINE1( 10 ) , STATMINl C 10 ) , DISTDETl (10, 100) 

236  DIMENSION  PMINE2( 10) ,STATMIN2( 10) , DISTDET2( 10, 100) 

237  DIMENSION  DEPMINE1(10),DEPMINE2(10) 

*  EFFECTIVE  WIDTH  OF  Ml 

238  WIDTH=3.5 


239  DO  31  UNIT=1,HUNIT 

240  CALL  GGUBS  (DSEED, 90, RNDMINE) 

X  DETERMINE  STATUS  OF  MINEFIELDl 

241  IF(RNDMINE(1)  .LT.  PMINEKUNIT))  THEN 

242  STATMIN1(UNIT)=1 
XDETERMINE  DEPTH  OF  MINEFIELDl 


243 

DEPMINEl (UNIT)=(MINDEPTH1+((MAXDEPTH1-MINDEPTH1) 

X 

xRNDriINE(2)))/1000 

244 

END  IF 

XSET 

UP  ARRAY  OF  DISTANCES  TO  MINE  ENCOUNTERS 

245 

IF  (STATMINKUNIT)  .EQ.  1)  THEN 

246 

DO  32  PACE=1,88 

247 

DISTDETl(UNIT,PACE)»((LQG(l-RNDMINE(PACE+2))) 

X 

/((-WIDTHXDENSMINE1)))/1000 

243 

IF  (DISTDETKUNIT/PACE)  .GT.  DEPMINEl  ( UNIT) )  THEN 

249 

DISTDET1(UNIT,PACE)  »  DEPMINEl(UNIT)/2 

250 

END  IF 

251 

32 

CONTINUE 

252 

END  IF 

253 

WRITE(54,967)  UNIT, STATMINl ( UNIT) , DEPMINEl (UNIT) , RNDMINE( 2 ) 

254 

967 

FORMAT(  •UNITM2,  •  STATUSMINEl  ',13,'  DEPTH  OF  FIELD  ',F5.3, 

X 

’  RNDNUM  •,F5.3) 

X  REPEAT  ABOVE  PROCEDURES  FOR  MINEFIELD2 

255 

CALL  GGUBS  (DSEED. 90, RNDMINE) 

256 

IF(RNDHINE(1)  .LT.  PMINE2(UNIT) )  THEN 

257 

STATMIN2(UNIT)=1 

258 

DEPMINE2(UNIT)=(MINDEPTH2+((MAXDEPTH2-MINDEPTH2) 

X 

XRNDMINE(2)))/1000 

259 

END  IF 

260 

IF  (STATMIN2(UNIT)  .EQ.  1)  THEN 

261 

DO  21  PACE=1,88 

262 

DISTDET2( UNIT, PACE) =((L0G(l-RNDMIHE(PACE+2))) 

X 

/((-WIDTHXDENSMINE2)))/1000 

263 

IF  (DISTDET2(UNIT,PACE)  .GT.  DEPMINE2(UNIT) )  THEN 

264 

DISTDET2(UNIT,PACE)  =  DEPMINE2(UNIT)/2 

265 

END  IF 

266 

21 

CONTINUE 

267 

END  IF 

268 

WRITE! 54, 977)  UNIT, STATMIN2( UNIT) , DEPMINE2( UNIT) . RNDMINE! 2) 

269 

977 

FORMAT! 'UNITM2,  '  STATUSMINE2  M3,'  DEPTH  OF  FIELD  ',F5.3, 

X 

'  RNDNUM  ',F5.3) 

270 

31 

CONTINUE 

271 

RETURN 

272 

END 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
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XXXXXXXXXXXXXXXXX  UNITSTATUS  XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 

273  SUBROUTINE  UNITSTATUS(BLUECODE,REDCODE, UNIT, NUNIT, POSITION, 

X  NUMBLUE, BLUESTATUS, REDSTATUS, NUMRED, ELEMENT, VEHTYPE, CLOCK, REP, 

X  RNGMIN) 

274  INTEGER  BLUECODE, REDCODE, UNIT, NUNIT, POSITION, NUMBLUE, EQUIP 

275  INTEGER  BLUESTATUS, REDSTATUS, NUMRED, ELEMENT, VEHTYPE, REP 

276  REAL  PRCHTEFFB,PRCNTEFFR,SURVIV,RSURVIV, CLOCK, RNGMIN 

277  DIMENSION  SURVIVC 10) ,BLUESTATUS(10, 20 ) , REDSTATUSC 30) 

278  DIMENSION  BLUECODE(10),VEHTYPE(10,20),EQUIP(10,10),PRCNTEFFB(10) 


279 

280 
281 
282 

283 

284  36 

285 

286 

287 

288 

289 

290 

291 

292 

293 

294 

295 

296 

297 

298 

299 

300  44 


XD  DETERMINE  CURRENT  STATUS  OF  RED  AND  BLUE  FORCES 


RSURVIV  =  0 
DO  42  UHIT=1, NUNIT 

SURVIV(UNIT)  =  0 
DO  36  J=l,10 

EQUIP(UNIT,J)  =  0 
CONTINUE 

DO  44  POSITION  =  1, NUMBLUE 

IF  (BLUESTATUSCUNIT, POSITION)  .NE.  0)  THEN 
SURVIV(UNIT)  =  SURVIV(UNIT)  +  1 
IF  (VEHTYPE(UNIT, POSITION)  .EQ.  1)  THEN 
EQUIP(UNIT,VEHTYPE( UNIT, POSITION)) 

=  EQUIPt UNIT, VEHTYPE! UNIT, POSITION) )+l 
ELSE  IF  (VEHTYPECUNIT, POSITION)  . EQ .  2)  THEN 
EQUIP! UNIT, VEHTYPE! UNIT, POSITION)) 

=  EQUIP!UNIT,VEHTYPE!UNIT,POSITION))+l 
ELSE  IF  !VEHTYPE!UNIT, POSITION)  .EQ.  3)  THEN 
EQUIP!UNIT, VEHTYPE! UNIT, POSITION)) 

=  EQUIP!UNIT, VEHTYPE! UNIT, POSITION) )+l 
ELSE  IF  !VEHTYPE!UNIT, POSITION)  .EQ.  4)  THEN 
EQUIP!UNIT,VEHTYPE!UNIT, POSITION)) 

s  EQUIP! UNIT, VEHTYPE! UNIT, POSITION) )+l 
ELSE  IF  !VEHTYPE!UNIT, POSITION)  .EQ.  5)  THEN 
EQUIP! UNIT, VEHTYPE! UNIT, POSITION)) 

s  EQUIP! UNIT, VEHTYPE! UNIT, POSITION) )+l 

END  IF 
END  IF 
CONTINUE 


X  CHECK  TO  SET  IF  BLUE  UNIT  HAS  REACHED  DEFENSIVE  POSTURE  CRITERIA 

301  PRCNTEFFB!UNIT)  =  SURVIV!UNIT)/NUMBLUE 

302  IF  !PRCNTEFFB!UHIT)  .LT.  .5)  THEN 

303  BLUECODE!UNIT)  =  0 

304  END  IF 


305  42 


CONTINUE 


i 
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X  TABULATION  OF  RED  STRNGTH 

306  DO  89  ELEMENT=1,NUMRED 

307  IFCREDSTATUSCELEMENT)  .NE.  0)  THEN 

308  RSURVIV  =  RSURVIV  +  1 

309  END  IF 

310  89  CONTINUE 

311  PRCNTEFFR  =  RSURVIV/NUMRED 

312  IF  (PRCNTEFFR  .LT.  .250)  THEN 

313  REDCODE  =  0 

314  END  IF 

*  WRITE  OUTPUT  TO  DATA  FILES 

315  IF  (CLOCK  .LT.  1.0  .OR.  PRCNTEFFR  ,LT.  .250 

*  .OR.  RNGMIN  .LT.  .250)  THEN 

316  DO  19  UNIT=1,NUNIT 

317  WRITE(54,987)  UNIT, BLUECODE(UNIT) , EQUIP(UNIT, 1 ) , 

*  EQUIP(UNIT,2),EQUIP(UNIT,4),EQUIP(UNIT,3),EQUIP(UNIT,5) 

318  987  FORMATCUNIT  Ml,'  UNITCODE  ',11,'  EQUIP  TANK  ', 

K  12,'  MINEPLOW  •  ,214,'  MINEROLLER' ,214) 

319  19  CONTINUE 

320  IF  (REP  .EQ.  1  .AND.  CLOCK  .LT.  1.0)  THEN 

321  DO  109  UNIT=1,NUNIT 

322  WRITE(44,387)  UNIT, BLUECODEC UNIT) , EQUIP(UNIT, 1 ) , 

K  EQUIP(UNIT,2),EQUIP(UNIT,4),EQUIP(UNIT,3),EQUIP(UNIT,5) 

323  387  FORMATCUNIT  ',11,'  UNITCODE  ',11,'  EQUIP  TANK  ', 

X  12,'  MINEPLOW  •  ,214,'  MINEROLLER’ , 214) 

324  109  CONTINUE 

325  WRITE(44,336) 

326  336  FORMATC NUMBER  OF  KILLS  BY  CATEGORY  PER  REPITITION') 

327  WRITE(44,337) 

328  337  FORMATC  DIRECTFIRE  ROLL  PLOW  MINEFIELD  PLOWCARR’, 

X  •  ROLLCARR  TOTKILL  CLOCK  MINRNG') 

329  WRITE(24,537) 

330  537  FORMATClOX, 'ACTIVE  MINEFIELDS  AND  TIMES  TO  DEFENSIVE  POSTURE') 

331  HRITE(24,538) 

332538  F0RMAT(5X, 'AVENUE  l',5X, '  AVENUE  2 ', 5X, '  AVENUE  3', 5X, 

X  '  AVENUE  4', 3X, 'RUN  TIME') 

333  WRITE(24,539) 

334  539  FORMATC  Ml  M2  Ml  M2  Ml  M2', 

X  '  Ml  M2') 


323  387 

324  109 

325 

326  336 

327 

328  337 

329 

330  537 

331 

332  538 

333 

334  539 


335  END  IF 

336  WRITE(54,717)  RSURVIV, REDCODE, PRCNTEFFR 

337  717  FORMATC  'RED  UNIT  fSURVIV  ',F3.0,'  UNITCODE  ,12,'  y.EFF',F5.3) 

338  END  IF 

339  RETURN 

340  END 

XXX)(X)(XXXXXXXX9(XXXXK9(XXXXXXXXXXKXXXXXXXXXXXXXKXXXXXXXXXXXXXXXXXXXX 
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XXXXXXXXXXXXXXXXXXXXLOCATIONXKXXXXXXXXXXXXXXXXXXXX 


341  SUBROUTINE  LOCATION  (LAG, UNIT, NUNIT, BLUEXPOS, BLUEYPOS, 

X  RNG,RNGMIN, REOX, REDY, AAA, CLOSE, BEHIND, BLUECODE) 

342  INTEGER  UNIT, NUNIT, CLOSE, BEHIND, BLUECODE 

343  REAL  LAG, BLUEXPOS,BLUEYPOS,REDX, REDY, RNG,RNGMIN,RNGMAX, AAA 

344  DIMENSION  BLUEXPOS(20),BLUEYPOS(20),RNG(20),BLUECODE(10) 

345  LAG  =0.5 

346  RNGMIN  =20.0 

347  RMGMAX  =  0.1 

348  CLOSE  =  0 

349  BEHIND  =  0 


350 

351 

352 

353 

354 

355 

356 

357 

358 


X  CHECK  TO  DETERMINE  IF  UNITS  ARE  ALIGNED 
DO  57  UNIT=1, NUNIT 

RNG(UNIT)=(SQRT(((REDX-BLUEXP0S(UNIT))XX2)+ 
X  ((REDY-BLUEYPOSCUNITIIXXZID/IO 

IF  (BLUECODE(UNIT)  .EQ.  0)  THEN 
GO  TO  57 

END  IF 

IF  (RNG(UNIT)  .LT.  RNGMIN  )  THEN 
RNGMIN  =  RNG(UNIT) 

CLOSE=UNIT 
END  IF 


359 

360 

361 

362  57 


IF  (RNG(UNIT)  .GT.  RNGMAX  )  THEN 
RNGMAX  =  RNG(UNIT) 

END  IF 
CONTINUI; 


X  CALCULATE  THE  LAG  FACTOR  AAA 

363  IFC (RNGMAX  -  RNGMIN)  .GT.  LAG)  THEN 

364  AAA  =  <RHGMAX-RNGMIN)/LAG 

365  BEHIND  =  1 

366  END  IF 

367  RETURN 

368  END 


xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 


n 


J 


"1 


i 


t 


f 
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xxxxxxxxxx 


MOVl 


xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 


369  SUBROUTINE  MOVl  (LOG, TAIL, XNODE,YNODE, SPEED, TRAVEL, ANGLE, AVE,DIST, 

X  NODE, ISTART, DISTANCE, BLUEXPOS.BLUEYPOS, CLOCK, UNIT, 

X  BLUEXOFFl , BLUEYOFFl , BLUEX0FF2, BLUEY0FF2, ENTRYl , 

X  BLUEX1P0S,BLUEY1P0S,UNITSPD,NUMBLUE,VEHTYPE,AAA, 

X  CLOSE, BEHIND, BLUECODE,BLUEXOFFO,BLUEYOFFO,DEPMIHE1, 

*  MINEl , STATMINl , DSEED, BLUESTATUS, DISTDETl , REDX, REDY, 

X  BLUEDETECT1,RNG,BULL1,BYPASS1,ENTRY2,DEPMINE2,MINE2, 

»  STATMIN2,DISTDET2,BULL2,BYPASS2,MINEKILL,R0LLKILL, 

X  PLOWKILL,ROLLBRCHKILL,PLOWBRCHKILL,REP,MTYPE) 

370  INTEGER  TAIL , NODE, LOC, ISTART, UNIT, CLOSE, BEHIND, ENTRYl , MINEl 

371  INTEGER  NNODE, AVE, VEHTYPE, NUMBLUE, BLUECODE, STATMINl , BLUESTATUS 

372  INTEGER  ACTIVEl ,ACTIVE2, CLEAR, PSN, BLUEDETECTl , BULLl , BYPASSl 

373  INTEGER  ENTRY2,MINE2,STATMIN2,BULL2,BYPASS2,MINEKILL,R0LLKILL 

374  INTEGER  TEMPTYPE,TEMPSTATUS, TEMPDETECT, PLOWKILL , PLOWBRCHKILL , REP 

375  INTEGER  ROLLBRCHKILL ,MTYPE 

376  REAL  DIST, SPEED, DISTANCE, BLUEXPOS,BLUEYPOS,MINEDET, REDX 

377  REAL  BLUEXOFFl, BLUY0FF1,BLUEX0FF2,BLUEY0FF2, DISTDETl, REDY 

378  REAL  BLUEXIPOS, BLUEYIPOS, BLUEXOFFO , BLUEYOFFO , WIDTH, STEPMINEl 

379  REAL  XNODE,YNODE,ANGLE,UNITSPD, AAA, DENSITY, MINERND,STEPMINE2 

380  REAL  MINEPK,M0VE,DEPMINE1,RNG,DEPMINE2,DISTDET2,MINEDET2 

381  REAL  MINEDET1,PDET0NAT4 

382  REALX8  DSEED 

383  DIMENSION  TAILC150),NODE(150),LOC(10),BLUEDETECTl(10,20) 

384  DIMENSION  DIST(  100) ,  AVEdO,  30 ) ,  SPEED!  10 ,80) ,  DISTDETK 10, 100 ) 

385  DIMENSION  ANGLE! 100),DISTANCE( 10), ISTART! 10 ), WIDTHCIO ) ,RNG(20) 

386  DIMENSION  XNODE!150),YNODE!150),BLUEXPOS!20),BLUEYPOS!20) 

387  DIMENSION  BLUEXOFFl !20) , BLUEYOFFl !20 ), BLUEX0FF2! 20 ), ENTRYl ! 10 ) 

388  DIMENSION  BLUEYOFF2!20),BLUEX1POS!10,20),BLUEY1POS!10,20) 

389  DIMENSION  UNITSPD!10),VEHTYPE!10,20) ,BLUECODE!10) ,MINE1!10) 

390  DIMENSION  BLUEY0FF0!20) , BLUEXOFFO! 20) ,MINERND! 100) , STATMINl ! 10) 

391  DIMENSION  BLUESTATUS! 10, 20), CLEAR!20) ,MOVE!20), DEPMINEIIIO) 

392  DIMENSION  BULLl! 10), BYPASSl! 10) , DISTDET2! 10, 100) , ENTRY2! 10) 

393  DIMENSION  MIHE2! 10) ,STATMIN2! 10 ) , DEPMINE2! 10) , BYPASS2! 10) 

394  DIMENSION  BULL2! 10) ,MINEKILL! 100) , ROLLKILL ! 100) , PLOWKILL! 100) 

395  DIMENSION  PL0WBRCHKILL!100) , ROLLBRCHKILL ! 100) , MTYPE! 20) 


396 

MINEPK=.99 

397 

STEP=0.1 

398 

STEPMINE2=9.0 

399 

STEPMINE1=9.0 

400 

MINEDET1=0.1 

401 

MINEDET2=0.5 

402 

PCLEAR4=.861 

403 

PCLEAR5=.926 

404 

PDETONAT4=,10 

405 

PSURVIV4=.90 

406 

PSURVIV5=.75 

407 

PDETTNK4=.999 

408 

PDETTNK5=.978 

X  PRINTX, 'BLUECODE*, UNIT, BLUECODE!UNIT),LOC!UNIT) 

409  CALL  GGUBS!DSEED,100,MINERND) 


410 

411 

412 

413 

414 

415 

416 


DO  70  K0UNT=1,5 

LOC!UNIT)=AVE!UNIT,ISTARTXUNIT)) 

IF  !BLUECODE!UNIT)  .EQ.  0)  THEN 
TRAVEL  =  0 
UNITSPD!UNIT)  *  0 
GO  TO  75 

END  IF 


417  CALL  SPD!TRAVEL, SPEED, LOC, STEP, UNIT, UNITSPD, VEHTYPE, NUMBLUE, 

X  AAA, CLOSE, BEHIND, BLUESTATUS) 
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418 

419 

420 

421 

422 

423 

424 

425 

426 

427 

428 

429 

430  33 

431 

432 

433 

434 


IF  (ENTRYKUNIT)  .EQ.  0)  THEM 

IF  (LOC(UNIT)  .EQ.  MINEKUHIT)  .AND.  STATMINKUNIT)  .EQ.  1)  THEN 
IF  (MINERNDd)  .LT.  MINEDETl)  THEN 
DO  33  K=1,NUMBLUE 

IF  (BLUESTATUS(UNIT,K)  .EQ.  2)  THEN 
BLUESTATUS(UNIT,IO  =  1 
END  IF 

IF  (VEHTYPE(UNIT,K)  .EQ.  2  )  THEN 
VEHTYPE(UNIT,K)  =  4 

ELSE  IF  (VEHTYPE(UNIT,K)  .EQ.  3  )  THEN 
VEHTYPE<UNIT,K)  =  5 
END  IF 
CONTINUE 

BLUEC0DE(UNIT)=2 

CLEAR(UNIT)=3 

MOVE(UNIT)=0.001 

ENTRY1(UNIT)=1 


435  WRITE<54,767)  CLOCK, UNIT, LOC(UNIT),BLUECODE(UNIT) 

436  767  F0RMAT(2X,F4.1,  •  UNIT  Ml,'  DETECTED  MINEl  AT  ',13, 

K  '  BLUECODE  IS  ',11) 


437 

438 

439 

440 

441 

442 

443 

444 

445 

446 

447 

448 

449 

450  52 

451 


GO  TO  98 

ELSE  IF  (DISTDETKUNIT,!)  .LT.  DISTANCE(UNIT) )  THEN 
DO  52  I=1,NUMBLUE 

IF  (BLUESTATUS(UNIT,I)  .NE.  0)  THEN 
RANGE1=CSQRT((<REDX-BLUEX1P0S(UNIT,I))*X2)+ 

*  ((REDY-BLUEY1POS(UNIT,I))XX2)))/10 

IF  (RANGEl  .LT.  STEPMINEl)  THEN 
STEPMINE1=RANGE1 
ACTIVE1=I 

ELSE  IF  (RANGEl  .LT.  STEPMINE2)  THEN 
STEPMINE2=RANGE1 
ACTIVE2»I 

END  IF 
END  IF 
CONTINUE 

BLUECODE(UNIT)  =  2 


452  WRITE(54,757)  CLOCK, UNIT, LOC(UNIT) , BLUECODEC UNIT ) 

453  757  F0RMAT(2X,F4.1, '  UNIT  ',11,'  DETONATED  MINEl  AT  ',13, 

X  '  BLUECODE  IS  ',11) 


454 

455 

456 

457 

458 

459 

46  0 

461 

462 

463 

464 


IF  (MINERND(2)  .LT.  MINEPK)  THEN 
BLUESTATUS(UNIT,ACTIVE1)=0 
MIHEKILL(REP)=MINEKILL(REP)+1 

MTYPE(VEHTYPE( UNIT, ACTIVE1))=MTYPE(VEHTYPE( UNIT, ACTIVE1))+1 
WRITE(54,913)  UNIT, ACTIVE1,VEHTYPE( UNIT, ACTIVEl) 

IF  (DISTDETKUNIT, 2)  .LT.  DISTANCE! UNIT)  .AND. 

X  MINERND(3)  .LT.  MINEPK)  THEN 

BLUESTATUS(UNIT,ACTIVE2)  =  0 
MINEKILL(REP)=MINEKILL(REP)+1 

MTYPE(VEHTYPE(UNIT,ACTIVE2))=MTYPE(VEHTYPE(UNIT,ACTIVE2))+1 
WRITE(54,913)  UNIT, ACTIVE2,VEHTYPE( UNIT, ACTIVE2) 

END  IF 


465  DO  35  K=1,HUMBLUE 

466  IF  (BLUESTATUS(UNIT,K)  .EQ.  2)  THEN 
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467 

468 

469 

470 

471 

472 

473 

474  35 

475 

476 

477 


BLUESTATUS(UNIT,K)  =  1 
END  IF 

IF  (VEHTYPE(UNIT,K)  .EQ.  2  )  THEN 
VEHTYPE(UNIT,IO  =  4 
ELSE  IF  (VEHTYPE(UNIT,K)  .EQ.  3  )  THEN 
VEHTYPE(UNIT,K)  =  5 
END  IF 
CONTINUE 

CLEAR<UNIT)=3 

ENTRY1(UNIT)=1 

MOVE(UNIT) =DISTDET1(UNIT, CL EARC UNIT) )+DISTDETl( UNIT, 1) 


478  913 

479 

480 

481 

482 

483 

484 

485 

486 

487 

488 

489 

490  59 

491 

492 

493 


FORMATC  VEHICLE  ',213,*  VEHTYPE  M3,'  KILLED  AT  MINEFIELD  1', 
'  MMMMMMMMMMMMMMMMMMMM') 

60  TO  98 

END  IF 

DO  59  K=1,NUMBLUE 

IF  (BLUESTATUS(UNIT,K)  .EQ.  2)  THEN 
BLUESTATUS(UNIT,K)  =  1 
END  IF 

IF  (VEHTYPE(UNIT,K)  .EQ.  2  )  THEN 
VEHTYPE(UNIT,K)  =  4 
ELSE  IF  (VEHTYPE(UNIT,K)  .EQ.  3  )  THEN 
VEHTYPE(UNIT,K)  =  5 
END  IF 
CONTINUE 

CLEAR(UNIT)=3 

ENTRY1<UNIT)=1 

M0VE(UNIT)=DISTDET1(UNIT,CLEAR(UHIT))+DISTDET1(UNIT,1) 


494  GO  TO  98 

495  END  IF 


496 

497 

498 

499 

500 

501 

502 

503 

504 

505 

506 

507 

508 

509  99 

510 

511 

512 

513 


END  IF 

ELSE  IF  <ENTRY2<UNIT)  .EQ.  0)  THEN 

IF  (LOCtUNIT)  .EQ.  MINE2(UNIT)  .AND.  STATMIN2(UNIT)  .EQ.  1)  THEN 
IF  (MINERNDCl)  .LT.  MIHEDET2)  THEN 
DO  99  K=1,NUMBLUE 

IF  (BLUESTATUS(UNIT,K)  .EQ.  2)  THEN 
BLUESTATUS(UNIT,K)  =  1 
END  IF 

IF  (VEHTYPE(UNIT,K)  .EQ.  2  )  THEN 
VEHTYPE(UNIT,K)  =  4 
ELSE  IF  (VEHTYPECUNIT,K)  .EQ.  3  )  THEN 
VEHTYPE(UNIT,K)  *  5 
END  IF 
CONTINUE 

BLUEC0DE(UMIT)=2 

CLEAR(UNIT)=3 

MOVE(UNIT)=0.001 

ENTRY2(UNIT)=1 


514  WRITE(54,766)  CLOCK, UNIT, LOC(UNIT) , BLUECODE(UNIT) 

515  766  F0RMAT(2X,F4.1, '  UNIT  »,I1,'  DETECTED  MINE2  AT  ',13, 

K  •  BLUECODE  IS  ’,11) 


516  GO  TO  98 

517  ELSE  IF  <DISTDET2CUNIT,1)  .LT.  DISTANCE(UNIT) )  THEN 

518  DO  96  I=1,NUMBLUE 
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519 

520 

521 

522 

523 

524 

525 

526 

527 

528 

529  96 

530 


IF  (BLUESTATUS(UNIT,I)  .NE.  0)  THEN 
RANGE1*(SQRT( ( (REDX-BLUEX1P0S(UNIT, I ) )X»2)+ 
X  ((REDY-BLUEYIPOSCUHIT, I) )XX2) J )/10 

IF  (RANGEl  .LT.  STEPMINEl)  THEN 
STEPMINE1=RANGE1 
ACTIVE1=I 

ELSE  IF  (RANGEl  .LT.  STEPMINE2)  THEN 
STEPMINE2=RANGE1 
ACT1VE2=I 

END  IF 
END  IF 
CONTINUE 

BLUECODE(UNIT>  =  2 


531  WRITE(54,756)  CLOCK, UNIT, LOC(UNIT) , BLUECODE(UNIT) 

532  756  F0RMAT(2X,F4.1, '  UNIT  Ml,'  DETONATED  MIHE2  AT  ',13, 

X  •  BLUECODE  IS  *,11) 


533 
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536 

537 

538 

539 

540 

541 

542 

543 


PRINTX,'UNIT  ACTIVEl  MINE2',UNIT,ACTIVE1 
IF  (MINERND(2)  .LT.  MINEPK)  THEN 
BLUESTATUS(UNIT, ACTIVEl) =0 
MINEKILL(REP)=MIHEKILL(REP)+1 

MTYPEC VEHTYPECUNIT, ACTIVEl ))=MTYPE(VEHTYPE( UNIT, ACTIVEl) )+l 
WRITE(54,943)  UNIT, ACTIVEl, VEHTYPECUNIT, ACTIVEl) 

IF  (DISTDET2(UNIT,2)  .LT.  DISTANCE(UNIT)  .AND. 

X  MINERND(3)  .LT.  MINEPK)  THEN 

BLUESTATUS(UNIT,ACTIVE2)  =  0 
MINEKILL(REP)=MINEKILL(REP)+1 

MTYPEC VEHTYPECUNIT, ACTIVE2))=MTYPE( VEHTYPECUNIT, ACTIVE2))+1 
WRITE(54,943)  UNIT, ACTIVE2, VEHTYPECUNIT, ACTIVE2) 

END  IF 
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545 
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551 
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554 

555 

556 


DO  95  K=1,MUMBLUE 

IF  CBLUESTATUSCUNIT,K)  .EQ.  2)  THEN 
BLUESTATUSCUNIT,K)  »  1 
END  IF 

IF  (VEHTYPECUNIT, K)  .EQ.  2  )  THEN 
VEHTYPECUNIT, K)  =  4 

ELSE  IF  (VEHTYPECUNIT, K)  .EQ.  3  )  THEN 
VEHTYPECUNIT, K)  =  5 
END  IF 
CONTINUE 

CLEARCUNIT)=3 

ENTRY2(UNIT)=1 

MOVEC UNIT) =DISTDET2CUNIT, CL EARC UNIT) )+DISTDET2C UNIT, 1) 
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FORMATC  VEHICLE  ',213,'  VEHTYPE  ',13,'  KILLED  AT  MINEFIELD  2', 
•  MMMMMMMMMMMMMMMMMMMM ' ) 

GO  TO  98 

END  IF 

DO  94  K=1,NUMBLUE 

IF  CBLUESTATUS(UNIT,K)  .EQ.  2)  THEN 
BLUESTATUSCUNIT,K)  =  1 
END  IF 

IF  (VEHTYPECUNIT, K)  .EQ.  2  )  THEN 
VEHTYPECUNIT, K)  =  4 

ELSE  IF  (VEHTYPECUNIT, K)  .EQ.  3  )  THEN 
VEHTYPECUNIT, K)  *  5 
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568  END  IF 

569  94  CONTINUE 

570  CLEAR(UNIT)»5 

571  ENTRY2<UNIT)=1 

572  M0VE(UNIT)=DISTDET2(UNIT,CLEAR(UNIT))+DISTDET2(UNIT,1) 

573  GO  TO  98 

574  END  IF 


575 
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600 


END  IF 
END  IF 

IF  (ENTRYKUNIT)  .EQ.  2)  THEN 
IF  (LOC(UNIT)  .EQ.  MINEKUNIT))  THEN 

IF  (BULLKUMIT)  .EQ.  1)  THEN 
GO  TO  41 

ELSE  IF  (BYPASSKUNIT)  .EQ.  1)  THEN 
GO  TO  46 

END  IF 

IF  (BULLKUNIT)  .EQ.  0  .AND.  BYPASSKUNIT)  .EQ.  0)  THEN 
DO  26  IIPSN=1,NUMBLUE 

IF  (BLUESTATUSCUNIT.IIPSN)  .EQ.  0)  THEN 

GO  TO  26 

ELSE  IF  (VEHTYPECUHIT,IIPSN)  .EQ.  1)  THEN 

IF  (DISTANCE(UNIT)  .GE.  DEPMINEl(UNIT)/2)  THEN 
BULLKUNIT)  =  1 
GO  TO  46 

ELSE  IF  {DISTANCE(UNIT)  -LT.  DEPMINEKUNIT)/2)  THEN 
BYPASSKUNIT)  =  1 
60  TO  41 

END  IF 

ELSE  IF  (VEHTYPE(UNIT,IIPSN)  .NE.  1)  THEN 

GO  TO  25 

END  IF 
CONTINUE 
END  IF 
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IF  (MOVE(UNIT)  .LT.  DISTANCE(UNIT) )  THEN 
DO  37  IPSN  =  KNUMBLUE 

IF  <BLUESTATUS(UNIT,IPSN)  .EQ.  0)  THEN 
GO  TO  37 
END  IF 

IF  (VEHTYPECUMIT.IPSN)  . EQ .  1)  THEN 

IF  (MINERNDCCLEARCUNIT))  .LT.  MINEPK)  THEN 
BLUESTATUS(UNIT,IPSN)  =  0 
MINEKILL(REP)=MINEKILL(REP)+1 
MTYPE( VEHTYPECUMIT, IPSN) )=MTYPE(VEHTYPE( UNIT, IPSN ))+l 
WRITE(54,940)  UNIT, IPSN, VEHTYPcC UNIT, IPSN) 

FORMATC  VEHICLE  ',213,'  VEHTYPE  ',13,'  KILLED  IN  MINEFIELD  1  ', 

*  'DUE  TO  UNCLEARED  MINE') 

GO  TO  36 

ELSE  IF  (MINERND(CLEAR(UNIT))  .GE.  MINEPK)  THEN 
GO  TO  36 
END  IF 

ELSE  IF  (VEHTYPE(UNIT,IPSN)  .EQ.  4)  THEN 

IF  (MINERND(CLEAR(UNIT))  .LT.  PCLEAR4)  THEN 
CLEAR(UNIT)=  CLEAR(UNIT)  +  1 
IF  (MINERHD(CLEAR(UNIT))  .GE.  PDET0NAT4)  THEN 
WRITE(54,641)  UNIT, IPSN, VEHTYPEC UNIT, IPSN) 

FORMATC  VEHICLE  ',213,'  VEHTYPE  ',13,'  CLEARED  A  MINE', 

*  '  IN  MINEFIELD  1  SSSS') 
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645 
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CLEAR(UNIT)=  CLEAR(UNIT)  +  1 
GO  TO  36 

ELSE  IF  <MINERMD(CLEAR(UNIT))  .LT.  PDET0NAT4)  THEN 
CLEARCUNIT)=  CLEAR(UNIT)  +  1 
IF  (MIHERND<CLEAR(UNIT))  .LT.  PSURVIV4)  THEN 
WRITE(54,941)  UNIT, IPSN, VEHTYPE(UNIT, IPSN) 

FORMATC  VEHICLE  ',213, •  VEHTYPE  M3,'  CLEARED/SURVIVED  BLAST', 

K  '  IN  MINEFIELD  1  SSSS') 

GO  TO  36 

ELSE  IF  <MINERND(CLEAR(UNIT))  .GE.  PSURVIV4)  THEN 
WRITE(54,942)  UNIT, IPSN, VEHTYPEL UNIT, IPSN) 

FORMATC  VEHICLE  ',213,'  VEHTYPE  ',13,'  CLEARED/PLOW  DID  NOT  ', 

*  •  SURVIVE  IN  MINEFIELD  1') 

PL0WKILL(REP)=PL0WKILL(REP)+1 
VEHTYPE(UNIT,IPSN)  =  1 
TEMPTYPE=VEHTYPE( UNIT, IPSN) 
TEMPSTATUS=BLUESTATUS( UNIT, IPSN) 
TEMPDETECT=BLUEDETECT1(UNIT,IPSN) 

DO  61  PSN=IPSN,NUMBLUE-1 
VEHTYPEL  UNIT , PSN) =VEHTYPE( UNIT , PSN+1 ) 
BLUESTATUS(UNIT,PSN)=  BLUESTATUSC UNIT, PSN+1) 
BLUEDETECTK UNIT, PSN)=BLUEDETECT1( UNIT, PSN+1) 
CONTINUE 

BLUESTATUSC UNIT, NUMBLUE)=TEMPSTATUS 
VEHTYPE(UNIT,NUMBLUE)=TEMPTYPE 
BLUEDETECT1(UNIT,NUMBLUE)=TEMPDETECT 
GO  TO  36 
END  IF 
END  IF 

ELSE  IF  (MINERNDCCLEARCUNIT))  .LT.  PDETTHK4  .AND. 

*  MINERNDCCLEARCUNIT))  .GT.  PCLEAR4)  THEN 

CLEARCUNIT)=CLEARCUNIT)+1 
IF  CMINERNDCCLEARCUNIT))  .LT.  MINEPK)  THEN 
WRITEC54,945)  UNIT, IPSN, VEHTYPECUNIT, IPSN) 

FORMATC  VEHICLE  ',213,'  VEHTYPE  ',13,'  PLOW  FAILED  TO  CLEAR  ', 

X  'MINE/CARRIER  WAS  KILLED') 

BLUESTATUSCUNIT,IPSN)  =  0 
PL0WBRCHKILLCREP)=PL0WBRCHKILLCREP)+1 
GO  TO  36 

ELSE  IF  CMINERNDCCLEARCUNIT))  .GE.  MINEPK)  THEN 
GO  TO  36 
END  IF 

ELSE  IF  CMINERNDCCLEARCUNIT))  .GE.  PDETTNK4)  THEN 
CLEARCUNIT)=CLEARCUNIT)+1 
WRITEC54,946)  UNIT, IPSN, VEHTYPECUNIT, IPSN) 

FORMATC  VEHICLE  ',213,'  VEHTYPE  ',13,'  PLOW  FAILED  TO  CLEAR  ', 

*  'MINE/CARRIER  SURVIVED') 

WRITEC54,947) 

FORMATC'MINE  LEFT  IN  PATH  UNEXPLODED') 

GO  TO  37 

END  IF 

ELSE  IF  C VEHTYPECUNIT, IPSN)  .EQ.  5)  THEN 
IF  CMINERNDCCLEARCUNIT))  .LT.  PCLEAR5)  THEN 
CLEARCUNIT)=  CLEARCUNIT)  +  1 
IF  CMINERNDCCLEARCUNIT))  .LT.  PSURVIV5)  THEN 
WRITEC54,901)  UNIT, IPSN, VEHTYPECUNIT, IPSN) 

FORMATC  VEHICLE  ',213,'  VEHTYPE  ',13,'  CLEARED/SURVIVED  A  MINE', 

*  '  IN  MINEFIELD  1  SSSS') 

GO  TO  36 

ELSE  IF  CMINERNDCCLEARCUNIT))  .GE.  PSURVIV5)  THEN 
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WRITE{54,944)  UNIT, IPSH, VEHTYPECUNIT, IPSN) 

FORMATC  VEHICLE  ',213,'  VEHTYPE  M3,*  CLEARED/ROLLER  DIDNOT*, 

*  •  SURVIVE  IN  MINEFIELD  1') 

ROLLKILL(REP)=ROLLKILL(REP)+l 
VEHTYPECUNIT, IPSN)  =  1 
TEMPTYPE=VEHTYPE(UNIT, IPSN) 
TEMPSTATUS=BLUESTATUS(UNIT,IPSN) 
TEMPDETECT=BLUEDETECT1 (UNIT, IPSN) 

DO  65  PSN»IPSN,NUMBLUE-1 

VEHTYPE(UNIT,PSN)=VEHTYPE(UNIT,PSN+1) 
BLUESTATUS(UNIT,PSN)=  BLUESTATUS(UNIT,PSN+1) 

BLUEDETECTK UNIT, PSM)=BLUEDETECT1 (UNIT, PSN+1) 

CONTINUE 

BLUESTATUS(UNIT,NUMBLUE)=TEMPSTATUS 
VEHTYPE(UNIT,NUMBLUE)=TEMPTYPE 
BLUEDETECT1(UNIT,NUMBLUE)=TEMPDETECT 
GO  TO  36 

END  IF 

ELSE  IF  (MINERND(CLEAR(UNIT))  .LT.  PDETTNK5  .AND. 

*  MINERND(CLEAR(UNIT))  .GT.  PCLEAR5)  THEN 

CLEAR(UNIT)=CLEAR(UNIT)+1 
IF  (MINERND(CLEAR(UNIT))  .LT.  MINEPK)  THEN 
BLUESTATUS(UNIT,IPSN)  =  0 
WRITE(54,955)  UNIT, IPSN, VEHTYPECUNIT, IPSN) 

FORMATC  VEHICLE  *,213,'  VEHTYPE  *,13,'  ROLLER  FAILED  TO  CLEAR  ', 
K  'NINE/CARRIER  WAS  KILLED’) 

R0LLBRCHKILL(REP)=R0LLBRCHKILL(REP)+1 
GO  TO  36 

ELSE  IF  (MINERNDCCLEARCUNIT))  .GE.  MINEPK)  THEN 
GO  TO  36 

END  IF 

ELSE  IF  (MINERNDCCLEARCUNIT))  .GE.  PDETTNK5)  THEN 
CLEARCUHIT)=CLEAR(UNIT)+1 
WRITEC54,948)  UNIT, IPSN, VEHTYPECUNIT, IPSN) 

FORMATC*  VEHICLE  *,213,*  VEHTYPE  ’,13,*  ROLLER  FAILED  TO  CLEAR  *, 
X  'MINE/CARRIER  SURVIVED’) 

WRITEC54,949) 

FORMATC ’MINE  LEFT  IN  PATH  UNEXPLODED’) 

GO  TO  37 

END  IF 
END  IF 
CONTINUE 

CLEARCUNIT)=CLEAR(UNIT)+1 
M0VECUNIT)=DISTDET1 (UNIT, CLEARC UNIT) )+MOVE( UNIT) 
IF  CDISTANCECUNIT)  .GT.  DEPMINEKUNIT) )  THEN 

ENTRY1CUNIT)=3 

IF  CBLUECODECUNIT)  .NE.  0)  THEN 
BLUECODECUNIT)  =  1 
DO  38  K=1,NUMBLUE 
IF  (VEHTYPECUNIT, K)  .EO.  4  )  THEN 
VEHTYPECUNIT, K)  =  2 

ELSE  IF  (VEHTYPECUNIT, K)  .EQ.  5  )  THEN 
VEHTYPECUNIT, K)  =  3 

END  IF 
CONTINUE 

END  IF 
END  IF 
END  IF 
END  IF 
END  IF 
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IF  (BULLl(UNIT).EQ.  1)  THEN 

TRAVEL=TRAVEL/10 

IFCMOVE(UNIT)  .LT.  DISTAMCE(UNIT) )  THEN 
DO  21  IPSN  -  1,NUMBLUE 

IF  (BLUESTATUS(UNIT,IPSN)  .EQ.  0)  THEN 
GO  TO  21 
END  IF 

IF  (MINERND(CLEAR(UNIT))  .LT.  MINEPK)  THEN 
BLUESTATUS(UNIT,IPSH)  =  0 
MINEKILL(REP)=MINEKILL(REP)+1 
MTYPE(VEHTYPE(UNIT, IPSN) )=MTYPE(VEHTYPE(UNIT, IPSN) )+l 
WRITE(54,967)  UNIT, IPSN, VEHTYPE( UNIT, IPSN) 

FORMATC  VEHICLE  ',213,'  VEHTYPE  MS,'  KILLED  IN  MINEFIELD  1  ', 
*  'DUE  TO  BULLING  THRU  •) 

GO  TO  71 

ELSE  IF  (MINERND(CLEAR(UNIT))  .GE.  MINEPK)  THEN 
GO  TO  71 
END  IF 
CONTINUE 

CLEAR(UNIT)=CLEAR(UNIT)+1 
MOVE(UNIT) =DISTDET1( UNIT, CL EAR( UNIT) )+MOVE( UNIT) 
IF  (DISTANCE(UNIT)  .GT.  DEPMINEKUNIT) )  THEN 

ENTRY1(UNIT)=3 

IF  (BLUECODE(UNIT)  .NE.  0)  THEN 
BLUECODE(UNIT)  =  1 
BULLKUNIT)  =  2 
GO  TO  75 

END  IF 
END  IF 
END  IF 

END  IF 
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IF  (BYPASSl(UNIT).EQ.  1)  THEN 

TRAVELsTRAVEL/'40 
IF  CKOUNT  .EQ.5)  THEN 
HRITE(54,968)  UNIT 

FORMATC  UNIT  ',13,'  IS  CONDUCTING  BYPASS  OPERATION  AROUND  ', 
*  'MINEFIELD  1  PPPPPPP  ') 

END  IF 

IF  (DISTANCE(UNIT)  .GT.  DEPMINEKUNIT))  THEN 

ENTRY1(UNIT)=3 

IF  (BLUECODE(UNIT)  .NE.  0)  THEN 
BLUECODE(UNIT)  =  1 
BYPA5SKUNIT)  =  2 

END  IF 
END  IF 
END  IF 
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IF  {ENTRY2(UNIT)  .EQ.  2)  THEN 
IF  (LOCCUNIT)  .EQ.  MINE2(UNIT))  THEN 

IF  CBULL2CUNIT)  .EQ.  1)  THEN 
GO  TO  93 

ELSE  IF  (BYPASS2(UNIT)  .EQ.  1)  THEN 
GO  TO  92 

END  IF 

IF  (BULL2(UNIT)  .EQ.  0  .AND.  BYPASS2(UNIT)  .EQ.  0)  THEN 
DO  91  IIPSN=1,NUMBLUE 

IF  <BLUESTATUS(UNIT,IIPSN)  .EQ.  0)  THEN 

GO  TO  91 
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ELSE  IF  (VEHTYPE(UNIT,IIPSN)  .EQ.  1)  THEM 

IF  (DISTANCE(UNIT)  .GE.  DEPMINE2(UNIT)/2)  THEN 
BULL2(UNIT)  =  1 
GO  TO  92 

ELSE  IF  (DISTANCE(UNIT)  .LT.  DEPMINE2(UNIT)/2)  THEN 
BYPASS2(UNIT)  =  1 
60  TO  93 

END  IF 

ELSE  IF  (VEHTYPECUNIT.IIPSN)  .NE.  1)  THEN 

GO  TO  72 

END  IF 
CONTINUE 
END  IF 
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IF  (MOVE(UNIT)  .LT.  DISTANCE(UNIT) )  THEN 
DO  73  IPSN  =  1,NUMBLUE 

IF  (BLUESTATUS(UHIT,IPSN)  .EQ.  0)  THEN 
GO  TO  73 
END  IF 

IF  (VEHTYPE(UNIT,IPSN)  .EQ.  1)  THEN 

IF  (MINERND(CLEAR(UNIT))  .LT.  MINEPK)  THEN 
BLUESTATUS(UNIT,IPSN)  =  0 
MINEKILL(REP)=MINEKILL(REP)+1 
MTYPE( VEHTYPE(UNIT, IPSN J)=MTYPE(VEHTYPE( UNIT, IPSN) )+l 
WRITE(54,741)  UNIT, IPSN, VEHTYPEC UNIT, IPSN) 

FORMATC  VEHICLE  ',213,'  VEHTYPE  *,13,’  KILLED  IN  MINEFIELD  2  ', 

X  'DUE  TO  UNCLEARED  MINE') 

GO  TO  78 

ELSE  IF  (MINERNDCCLEARCUNIT))  .GE.  MINEPK)  THEN 
GO  TO  78 
END  IF 

ELSE  IF  <VEHTYPE(UNIT,IPSN)  .EQ.  4)  THEM 

IF  (MINERND(CLEAR(UNIT))  .LT.  PCLEAR4)  THEN 
CLEAR(UNIT)=  CLEAR(UNIT)  +  1 
IF  (MIHERND(CLEAR(UNIT))  .GE.  PDET0NAT4)  THEN 
WRITE(54,341)  UNIT, IPSN, VEHTYPEC UNIT, IPSN) 

FORMATC  VEHICLE  ',213,'  VEHTYPE  ',13,'  CLEARED  A  MINE', 

«  •  IN  MINEFIELD  2  SSSS') 

CLEAR(UNIT)=  CLEAR(UNIT)  +  1 
GO  TO  78 

ELSE  IF  (MINERND(CLEAR(UNIT))  .LT.  PDET0NAT4)  THEN 
CLEAR(UNIT)=  CLEAR(UNIT)  +  1 
IF  (MINERNDCCLEARCUrilT))  .  LT .  PSURVIV4)  THEN 
WRITE(54,981)  UNIT, IPSN, VEHTYPEC UNIT, IPSN) 

FORMATC  VEHICLE  ',213,'  VEHTYPE  ’,13,'  CLEARED/SURVIVED  BLAST', 

X  '  IN  MINEFIELD  2  SSSS') 

GO  TO  78 

ELSE  IF  (MINERNDCCLEARCUNIT))  .GE.  PSURVIV4)  THEN 
WRITE(54,982)  UNIT, IPSN, VEHTYPEC UNIT, IPSN) 

FORMATC  VEHICLE  ’,213,'  VEHTYPE  ’,13,'  CLEARED/PLOW  DID  NOT  ', 

X  '  SURVIVE  IN  MINEFIELD  2') 

PL0HKILLCREP)=PL0WKILLCREP)+1 
VEHTYPECUNIT,IPSN)  =  1 
TEMPTYPE=VEHTYPECUNIT,IP3N) 
TEMPSTATUS=BLUESTATUSC UNIT, IPSN) 
TEMPDETECT=BLUEDETECT1C UNIT, IPSN) 

DO  53  PSN=IPSN,NUMBLUE-1 
VEHTYPEC UNIT, PSN)=VEHTYPEC UNIT, PSN+1) 
BLUEST ATUSC UNIT, PSN)=  BLUESTATUSC UNIT, PSN+1 ) 
BLUEDETECTIC UNIT, PSN)=BLUEDETECT1C UNIT, PSN+1) 
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CONTINUE 

BLUESTATUS(UNIT,NUMBLUE)=TEMPSTATUS 
VEHTYPE(UNIT,NUMBLUE)=TEMPTYPE 
BLUEDETECT1(UNIT,NUMBLUE)=TEMPDETECT 
GO  TO  78 
END  IF 
END  IF 

ELSE  IF  (MINERND(CLEAR(UNIT))  AT.  PDETTNK4  .AND. 

*  MINERND(CLEAR(UNIT))  .GT.  PCLEAR4)  THEN 

CLEAR(UNIT)=CLEAR(UNIT)+1 
IF  (MINERND(CLEAR(UNIT))  .LT.  MINEPK)  THEN 
WRITE(54,975)  UNIT, IPSN,VEHTYPE(UNIT, IPSN) 

FORMATC  VEHICLE  ',213,'  VEHTYPE  M3,'  PLOW  FAILED  TO  CLEAR  ', 

K  'MINE/CARRIER  WAS  KILLED') 

BLUESTATUS(UNIT,IPSN)  =  0 
PL0WBRCHKILL(R£P)*PL0WBRCHKILL(REP)+1 
GO  TO  78 

ELSE  IF  (MINERND(CLEAR(UNIT))  .GE.  MINEPK)  THEN 
GO  TO  78 
END  IF 

ELSE  IF  (MINERND(CLEAR(UNIT))  .GE.  PDETTNK4)  THEN 
CLEAR! UNIT)=CLEAR(UHIT)+1 
WRITE(54,976)  UNIT, IPSN, VEHTYPECUNIT, IPSN) 

FORMAT!'  VEHICLE  ',213,'  VEHTYPE  ',13,'  PLOW  FAILED  TO  CLEAR  ', 

X  'MINE/CARRIER  SURVIVED') 

WRITE!54,937) 

FORMAT! 'MINE  LEFT  IN  PATH  UNEXPLODED’) 

GO  TO  73 

END  IF 

ELSE  IF  !VEHTYPE!UNIT,IPSN)  .EQ.  5)  THEN 
IF  !MINERND!CLEAR!UNIT))  .LT.  PCLEAR5)  THEN 
CLEAR(UNIT)=  CLEARIUNIT)  +  1 
IF  !MINERND!CLEAR!UNIT))  .LT.  PSURVIV5)  THEN 
WRITE!54,933)  UNIT, IPSN, VEHTYPE! UNIT, IPSN) 

FORMAT!'  VEHICLE  ',213,'  VEHTYPE  ',13,'  CLEARED/SURVIVED  A  MINE’, 
X  '  IN  MINEFIELD  2  SSSS') 

GO  TO  78 

ELSE  IF  !MINERND!CLEAR!UNIT))  .GE.  PSURVIV5)  THEN 
WRITE!54,934)  UNIT, IPSN, VEHTYPE!UNIT, IPSN) 

FORMAT!'  VEHICLE  ',213,'  VEHTYPE  ',13,'  CLEARED/ROLLER  DIDNOT’, 

X  '  SURVIVE  IN  MINEFIELD  2') 

R0LLKILL!REP)=R0LLKILL!REP)+1 
VEHTYPE!UNIT,IPSN)  =  1 
TEMPTYPE=VEHTYPE! UNIT, IPSN) 

TEMPSTATUS=BLUESTATUS! UNIT, IPSN) 
TEMPDETECT=BLUEDETECT1! UNIT, IPSN) 

DO  45  PSH=IPSN,NUMBLUE-1 

VEHTYPE!UMIT,PSN)=VEHTYPE!UNIT,PSN+1) 
BLUESTATUS!UNIT,PSN)=  BLUESTATUS! UNIT, PSN+1 ) 
BLUEDETECT1!UNIT,PSN)=BLUEDETECT1!UNIT,PSN+1) 

CONTINUE 

BLUESTATUS! UNIT, NUMBLUE)=TEMPSTATUS 
VEHTYPE! UNIT, NUMBLUE)=TEMPTYPE 
BLUEDETECT1!UNIT,NUMBLUE)=TEMPDETECT 
GO  TO  78 

END  IF 

ELSE  IF  !MINERND!CLEAR!UNIT))  .LT.  PDETTNK5  .AND. 

X  MINERND!CLEAR!UNIT))  .GT.  PCLEAR5)  THEN 

CLEAR!UNIT)=CLEAR!UNIT)+1 
IF  !MINERND!CLEAR!UNIT))  .LT.  MINEPK)  THEN 
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897 

898 

899  935 

900 

901 

902 

903 

904 

905 

906 

907 

908  938 

909 

910  939 

911 

912 

913 

914  73 

915  78 

916 

917 

918 

919 

920 

921 

922 

923 

924 

925 

926 

927  48 

928 

929 

930 

931 

932 

933  93 

934 

935 

936 

937 

938 

939 

940 

941 

942 

943 

944 

945  957 

946 

947 

948 

949 

950  82 

951  84 

952 

953 


BLUESTATUS(UNIT,IPSN)  =  0 
WRITE(54,935)  UNIT,IPS»,VEHTYPE(UNIT,IPSN) 

FORMATC  VEHICLE  ',213,'  VEHTYPE  M3,'  ROLLER  FAILED  TO  CLEAR  • 
K  'MINE/CARRIER  WAS  KILLED') 

R0LLBRCHKILL(REP)=R0LLBRCHKILL(REP)+1 
GO  TO  78 

ELSE  IF  (MINERND(CLEAR(UNIT))  .GE.  MIHEPK)  THEN 
GO  TO  78 

END  IF 

ELSE  IF  (MINERND(CLEAR(UNIT))  .GE.  PDETTNK5)  THEN 
CLEAR(UNIT)=CLEAR(UNIT)+1 
WRITE(54,938)  UNIT, IPSN,VEHTYPE(UNIT, IPSN) 

FORMATC  VEHICLE  ',213,'  VEHTYPE  ',13,'  ROLLER  FAILED  TO  CLEAR  ' 
X  'MINE/CARRIER  SURVIVED') 

WRITE(54,939) 

FORMATCMINE  LEFT  IN  PATH  UNEXPLODED') 

GO  TO  73 


END  IF 
END  IF 
CONTINUE 

CLEAR(UNIT)=CLEAR(UNIT)+1 
M0VE(UNIT)=DISTDET2(UNIT,CLEAR(UNIT))+M0VE(UNIT) 
IF  (DISTANCE(UNIT)  .GT.  DEPMINE2( UNIT) )  THEN 

ENTRY2CUNIT)=3 

IF  (BLUECODECUNIT)  .NE.  0)  THEN 
BLUECODE(UNIT)  =  1 
DO  48  K=1,NUMBLUE 
IF  (VEHTYPE(UNIT,K)  .EQ.  4  )  THEN 
VEHTYPE(UNIT,K)  =  2 

ELSE  IF  (VEHTYPECUNIT,K)  .EQ.  5  )  THEN 
VEHTYPE(UNIT,K)  =  3 


END  IF 
CONTINUE 

END  IF 
END  IF 
END  IF 
END  IF 
END  IF 

IF  (BULL2(UNIT) .EQ.  1)  THEN 

TRAVEL=TRAVEL/10 

IF(MOVE(UNIT)  .LT.  DISTANCE(UNIT) )  THEN 
DO  82  IPSN  =  l,NUriBLUE 

IF  CBLUESTATUS(UHIT,IPSN)  .EQ.  0)  THEN 
GO  TO  82 
END  IF 

IF  (MINERND(CLEAR(UNIT))  .LT.  MINEPK)  THEN 
BLUESTATUS(UNIT,IPSN)  =  0 
MIHEKILL(REP)=MINEKILLCREP)+1 
MTYPEC VEHTYPECUNIT, IPSN) )=MTYPE(VEHTYPE(UNIT, IPSN) )+l 
WRITE(54,957)  UNIT, IPSN, VEHTYPE( UNIT, IPSN) 

FORMATC  VEHICLE  ',213,'  VEHTYPE  ',13,'  KILLED  IN  MINEFIELD  2  ', 
X  'DUE  TO  BULLING  THRU  ') 

GO  TO  84 

ELSE  IF  (MINERNDLCLEAR(UNIT))  .GE.  MINEPK)  THEN 
GO  TO  84 
END  IF 
CONTINUE 


CLEAR(UNIT)=CLEAR(UNIT)+1 
'  )VE(UNIT)=DI5TDET2( UNIT, CLEARC UNIT) )+MOVE(UNIT) 
IF  (DISTANCE(UNIT)  .GT.  DEPMINE2(UNIT) )  THEN 
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954 

955 

956 

957 

958 

959 

960 

961 

962 


ENTRY2(UNIT)=3 

IF  (BLUECODE(UMIT)  .NE.  0)  THEN 
BLUECODE(UNIT)  =  1 
BULL2(UHIT)  =  2 
60  TO  75 

END  IF 
END  IF 
END  IF 

END  IF 


963  92 

964 

965 

966 

967  977 

968 

969 

970 

971 

972 

973 

974 

975 

976 


IF  (BYPASS2CUMIT) .EQ.  1)  THEN 

TRAVEL=TRAVEL/50 
IF  (KOUNT  .EQ.5)  THEN 
WRITE(54,977)  UNIT 

FORMATC  UNIT  M3,*  IS  CONDUCTING  BYPASS  OPERATION  AROUND 
X  'MINEFIELD  2  PPPPPPP  ’) 

END  IF 

IF  (DISTANCE(UNIT)  .GT.  DEPMINE2(UHIT) )  THEN 

ENTRY2(UNIT)=3 

IF  (BLUECODE(UNIT)  .HE.  0)  THEN 
BLUECODECUNIT)  =  1 
BYPASS2(UNIT)  =  2 

END  IF 
END  IF 
END  IF 


977  75 

978 

979 

980 


983 

984 

985 

986 

987 

988 

989 

990 

991  70 

992 


994  931 


995  98 

996 


DELX=TRAVELXCOS(ANGLE(LOC(UNIT)))X10 

DELY=TRAVELXSIN(AHGLE(LOCCUNIT)))X10 

BLUEXPQSCUNIT)=BLUEXPOS(UNIT)+DELX 

BLUEYPOS<UNIT)=BLUEYPOS(UNIT)+DELY 

CALL  OFFSET  (BLUEXPOS, BLUEYPOS, BLUEXOFFl, BLUEYOFFl , LOC, 

X  ANGLE, UNIT, NUMBLUE, CLOCK, KOUNT, BLUECODE, 

X  BLUEX0FF2,BLUEY0FF2,BLUEX1P0S,BLUEY1P0S, 

X  BLUEXOFFO,BLUEYOFFO) 

DISTANCE(UNIT)=DISTANCE(UNIT)+TRAVEL 

IF  (DISTANCE(UNIT)  .GE.  DIST( L0C( UNIT ) ) )  THEN 
ISTART(UNIT)=ISTART(UNIT)+1 
LOC(UNIT)  =  AVE(UNIT,ISTART(UNIT)) 

DISTANCE(UNIT)=0.0 

BLUEXPOS(UNIT)  =  XNODECTAIL ( LOCC UNIT) ) ) 

BLUEYPOS(UNIT)  =  YNODE(TAIL ( LOCC UNIT) ) ) 

GO  TO  98 
END  IF 

CONTINUE 
GO  TO  98 

WRiTEC54,931)  CLOCK, UNIT, LOCC UNIT ),BLUEXPOS( UNIT), BLUEYPOSC UNIT), 
X  UNITSPDCUNIT),RNGCUNIT) 

F0R«ATC2X,F4.1, »  UNIT  ',13,'  LOC  ',13, 

X  '  POSITION  ',2F6.1,'  SPEED  ',F4,0,'  RANGE  ',F8.3) 

RETURN 

END 


XXXXXXXXXXXXXXXXXXXKXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 
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997 

998 

999 
1000 
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1003 

1004 

1005 

1006 

1007 

1008 

1009 

1010 

1011 

1012 

1013 

1014 

1015 

1016 

1017 

1018 


SPEED  XXXXXXXXJCXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 
SUBROUTINE  SPD(TRAVEL , SPEED, LOC, STEP, UNIT, UMITSPD, VEHTYPE, 

X  NUMBLUE, AAA, CLOSE, BEHIND, BLUESTATUS) 

INTEGER  LOC, UNIT, VEHTYPE, NUMBLUE, VEH, CLOSE, BEHIND 

INTEGER  BLUESTATUS 

REAL  SPEED, TRAVEL, STEP, UNITSPD, AAA 

DIMENSION  SPEED(10,80),LOC(10),UNITSPD(10),VEHTYPE(10,20) 
DIMENSION  BLUESTATUS(10,20) 

UNITSPD(UNIT)=160 

DO  23  VEH=1, NUMBLUE 
IF(BLUESTATUS(UNIT,VEH)  .NE.  0)  THEN 

IF(SPEED(VEHTYPE<UNIT,VEH),LOC(UNIT))  .LT.  UNITSPD(UNIT) )  THEN 
UNITSPD(UNIT)=SPEED(VEHTYPECUNIT,VEH),LOC(UNIT)) 

END  IF 
END  IF 

23  CONTINUE 

IF  (BEHIND  .EQ.  1  .AND.  CLOSE  .EQ.  UNIT)  THEN 
UNITSPD(UNIT)  =  UNITSPD(UNIT)/AAA 
TRAVEL  =  (UNITSPD(UNIT)/60)XSTEP 
GO  TO  51 
END  IF 

TRAVEL  =  (UNITSPD(UNIT)/60)XSTEP 

51  RETURN 

END 


xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 


XXXXXXXXXXKXXXXXXXXXX  OFFSET  xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 


1019 


1020 

1021 

1022 

1023 

1024 

1025 

1026 

1027 

1028 

1029 

1030 

1031 

1032 

1033 

1034 

1035 

1036 

1037 

1038 

1039 

1040 

1041 


1042 


1043 

1044 


SUBROUTINE  OFFSET  (BLUEXPOS, BLUEYPOS, BLUEXOFFl , BLUEYOFFl , 

X  LOG, ANGLE, UNIT, MUMBLUE, CLOCK, KOUNT, 

X  BLUECODE,BLUEXOFF2,BLUEYOFF2,BLUEX1POS,BLUEY1POS, 

X  BLUEXOFFO,BLU£YOFFO) 

INTEGER  LOC, UNIT, C, KOUNT, NUMBLUE,BLUECODE 
REAL  BLUEX1PLT,BLUEY1PLT, ANGLE, BLUEXPOS, BLUEYPOS 
REAL  XOFFPLT,YOFFPLT, CLOCK 

REAL  BLUEXOFFl, BLUEX0FF2, BLUEYOFFl, BLUEYOFF2,BLUEX1POS,BLUEY1POS 
REAL  BLUEXOFFO,BLUEYOFFO 

DIMENSION  BLUEXOFF1(20),BLUEYOFF1(20),ANGLE(100),BLUECODE(10) 
DIMENSION  BLUEXOFF0(20),BLUEYOFF0C20) 

DIMENSION  BLUEX1POS(10,20),BLUEY1POS(10,20),LOC(10) 

DIMENSION  BLUEXPOSt 20), BLUEYPOS! 20), BLUEXOFF2C20),BLUEYOFF2(2O) 

DO  60  C=1,NUMBLUE 
IF  (BLUECODE(UNIT)  .EQ.  0)  THEN 
XOFFPLT=BLUEXOFFO(C) 

YOFFPLT=BLUEYOFFO(C) 

ELSE  IF  (BLUECODE(UNIT)  .E5.  1)  THEN 
XOFFPLT=BLUEXOFFl(C) 

YOFFPLT=BLUEYOFFl(C) 

ELSE  IF  (BLUECODE(UNIT)  .EQ.  2)  THEN 
X0FFPLT=flLUEX0FF2(C) 

Y0FFPLT=BLUEY0FF2(C) 

END  IF 

BLUEX1P0S(UNIT,C)=BLUEXP0S(UNIT)+(X0FFPLTXC0S(ANGLE(L0C(UHIT))) 

X  +YOFFPLTXSIN( ANGLE! LOC( UNIT) ) ) ) 

BLUEYlPOS!UNIT,C)=BLUEYPOS!UNIT)+!-XOFFPLTXSIN!ANGLE!LOC!UNIT))) 
X  +YOFFPLTXCOS!ANGLE! LOC! UNIT) ) ) ) 

60  CONTINUE 


RETURN 

END 


XXXXXXXXXXXXXXXXXXXXXXXXXXKXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 


XXXXXXXXXJCXXXXXXX  DETECTION  xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 


1072 

1073 

1074  39 

1075 

1076 


SUBROUTINE  REDDETECT  (REDXPOS,REDYPOS,BLUEXPOS, BLUEYPOS, 
BLUEX1P0S,BLUEY1P0S,MUNIT,REDENGAGE,BLUESTATUS, 
ANGLE,UNIT,UNITSPD,CLOCK,LOC,CV,NUMRED,NUMBLUE, 
REDX,REDY,RED,RPLOOK,REDSTATUS,DSEED,VEHTYPE, 
REDDETECT1,R£DDETECT2,  ELEMENT,  POSITION,  TAU, 
RVEHTYP,BLUECODE,RMAX) 

INTEGER  UNIT, LOC,NUMRED, RED, REDSTATUS,VEHTYPE,REDENGAGE 
INTEGER  REDDETECT1,REDDETECT2, ELEMENT, POSITION, NUNIT 
INTEGER  BLUESTATUS, RVEHTYP, BLUECODE 
REAL  REDXPOS,REDYPOS,BLUEXPOS,BLUEYPOS 
REAL  BLUEX1POS,BLUEY1POS, ANGLE, UNITSPD 
REAL  CLOCK, CV,REDX,REDY, HEIGHT, TAU, DENOM,RPLOOK,REDPDET 
REAL  RAND, RMAX, RAF, RNGADJ , RNGDETl , RNGDET2, RANGEl , RANGE2 
REALX8  DSEED 

DIMENSION  BLUEXPOS(20),BLUEYPOS(20),LOCC10),UNITSPD(10),CV(10) 
DIMENSION  BLUEX1POS(10,20),BLUEY1POS(10,20),ANGLE(100) 

DIMENSION  RED(30),REDXPOS(30),REDYPOS(30),RPLOOK(10,30) 
DIMENSION  RAND( 10), REDSTATUS( 30 ) , RMAXC  30 ) , TEMPC  30 ) 

DIMENSION  VEHTYPE(10,20),HEIGHT(20),RAF(8),REDENGAGE(100) 
DIMENSION  REDDETECT1(30),REDDETECT2(30),RNGDET1(30),RNGDET2(30) 
DIMENSION  BLUESTATUS(10,20),RVEHTYP(30),BLUECODE(10) 

HEIGHT(1)=2.4 

HEIGHT(2)=2.4 

HEIGHT(3)=2.4 

HEIGHT(4)=2.4 

HEIGHT(5)=2.4 

RNGDET1(ELEMENT)=300.0 

RANGE1=0.0 

RNGDET2(ELEMENT)=500.0 

RANGE2=0.0 

REDDETECTl C  EL  EMENT) *0 
REDDETECT2(ELEMENT)=0 


DO  39  1=1,3 
RAF(I)=.000 
CONTINUE 

RAF(4)=.10 

RAF(5)=,10 
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X  LOOP  77  NUMBER  OF  BLUE  UNITS 

1077  DO  77  UNIT=1,NUNIT 

1078  IF  (BLUECODE(UNIT)  .EQ.  0  )  THEN 

1079  CVCUNITJ  =  0 

1080  60  TO  66 

1081  END  IF 

1082  OBSVECX*REDX-BLUEXPOS(UNIT) 

1083  OBSVECY=REDY-BLUEYPOS{UNIT) 

1084  DIRVECX=COS(ANGLE(LOC(UNIT))) 

1085  DIRVECY=SIN(ANGLE(LOC(UNIT))) 

1086  0BSVECL=SQRT((0BSVECX*»2)+(0DSVECY«X2)) 

1087  CVANGLE=ACOS(((OBSVECXKDIRVECX)+(OBSVECY»DIRVECY))/OBSVECL) 

1088  CV(UNIT)  =  (UN1TSPD(UNIT)X1000/3600)XSIN(CVANGLE) 


X  LOOP  79  NUMBER  OF  BLUE  ELEMENTS  IN  EACH  UNIT 

1089  66  DO  79  POSITION=l,NUMBLUE 

1090  IF  (BLUESTATUS(UNIT,POSITION)  .EQ.  0)  THEN 

1091  60  TO  79 

1092  END  IF 

1093  CALL  GGUBS(DSEED,3>RAND) 

1094  RANGE=(SQRT(((REDXP0S(ELEMENT)-BLUEX1P0S(UNIT,P0SITI0N))XX2)+ 

X  ((REDYPOS( ELEMENT)-BLUEY1P0S(UN1T, POSITION) )XK2)))/10 

1095  IF  (BLUECODE(UNIT)  .EQ.  0)  THEN 

1096  RNGAPP=CRANGE*2. 8 )/<((HEIGHT(VEHTYPE( UNIT, POSITION) )/2)xRAND(l)) 

X  +(HEIOHT(VEHTYPE( UNIT, POSITION) )/4)) 

1097  GO  TO  55 

1098  END  IF 

1099  RNGAPP=(RANGEX2. 8)/(( (HEIGHT! VEHTYPE(UNIT,P0SIT10N))/2)XRAND(1)) 

X  +(HEIGHT(VEHTYPE(UNIT, POSITION) )/2)) 


1100  55 

1101 
1102 
1103 


IF  (RANGE  .LT.  .250)  THEN 
REDPDET=1.0 
60  TO  34 

END  IF 


DEN0M=1.453+(TAUX( ,05978+(2.188XRNGAPPXRNGAPP)- 
.5038XCV(UNIT))) 

DETRATE=RPLOOK(UNIT,ELEMENT)X(-.003+(1.088/'DENOM)) 


IF  (DETRATE  .LE.  0.0)  THEN 
DETRATE  =0.0 

ELSE  IF  (DETRATE  .GT.  5.0)  THEN 
REDPDET=1.0 
GO  TO  34 
END  IF 


1112  REDPDET=1-EXP(-DETRATEX30) 

1113  34  IF  (REDENGAGE(((NUMBLUEX(UNIT-1))+P0SITI0N))  .GE.  2)  THEN 

1114  GO  TO  79 

1115  END  IF 

1116  IF  (REDPDET  .GE.  RAMD(2))  tHEN 

1117  IF  (RANGE  .LE.  RMAX(ELEMENT) )  THEN 
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1118 


RNGADJ=(RANGE/(l-(RAND(3)/2)))  +  RAF(VEHTYPE(UNIT, POSITION) ) 


IF  (RNGADJ  .LT.  RNGDETKELEMENT))  THEN 
RNGDETK  ELEMENT)  =  RNGADJ 
RANGEl GRANGE 

REDSTATUSC ELEMENT)  =  2 

REDDETECTl(ELEMENT)=(NUMBLUEX(UNIT-l))+POSITION 
ELSE  IF  (RNGADJ  .LT.  RNGDET2( ELEMENT) )  THEN 
1F(RVEHTYP( ELEMENT)  .EQ.  1)  THEN 
RNGDET2( ELEMENT)  =  RNGADJ 
RANGE2=RANGE 

REDSTATUS( ELEMENT)  =  2 

REDDETECT2( ELEMENT) =  (NUMBLUE«(UNIT-1 ) )+POSITION 
END  IF 
END  IF 
END  IF 
END  IF 


1134  79  CONTINUE 

1135  77  CONTINUE 

1136  IF  (RNGDETKELEMENT)  .LT.  200.0)  THEN 

1137  REDENGAGE(REDDETECT1(ELEMENT))=REDENGAGE(REDDETECT1(ELEMENT))+1 

1138  END  IF 

1139  IF  (RNGDET2( ELEMENT)  .LT.  200.0)  THEN 

1140  REDENGAGE(REDDETECT2( ELEMENT) )=REDENGAGE(REDDETECT2( EL EMENT))+1 

1141  END  IF 

1142  RETURN 

1143  END 


1144  SUBROUTINE  BLUEDETECT  (REDXPOS, REDYPOS, BLUEXIPOS, BLUEYIPOS, 

X  BLUEENGAGE,BLUESTATUS,REDSTATUS,DSEED, UNIT, CLOCK, NUMRED, 

X  BLUEDETECTl, ELEMENT, POSITION, TAU,RVEHTYP,RHEIGHT,RRAF, 

X  BLUERMAX) 

1145  INTEGER  UNIT,NUMRED,REDSTATUS 

1146  INTEGER  BLUEDETECTl , ELEMENT, POSITION 

1147  INTEGER  BLUESTATUS,RVEHTYP, BLUEENGAGE 

1148  REAL  REDXPOS,REDYPOS 

1149  REAL  BLUEX1P0S,BLUEY1P0S,DETRATE 

1150  REAL  CLOCK, RHEIGHT,TAU,DENOM,RNGAPP, RANGE, BLUEPDET 

1151  REAL  RUND, BLUERMAX, RRAF, RNGADJ, RNGDET,RANGE1 

1152  REALX8  DSEED 

1153  DIMENSION  BLUEX1POS(10,20),BLUEY1POS(10,20) 

1154  DIMENSION  REDXPOS(30),REDYPOS(30) 

1155  DIMENSION  RUHD(10),REDSTATUS(30),BLUERMAX(10,20) 

1156  DIMENSION  BLUEDETECTl (10, 20), RNGDET( 10, 20 ),BLUEENGAGE{ 30) 

1157  DIMENSION  BLUESTATUS(10,20),RVEHTYP(30),RRAF(4),RHEIGHT(30) 

1158  RNGDET(UNIT,POSITION)=30O 

1159  RANGEl^O.O 

1160  BLUEDETECTl (UNIT, P0SITI0N)=0 


1161  DO  29  ELEMENT=1,NUMRED 
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1195  29  CONTINUE 

1196  IF  (RNGDET(UNIT, POSITION)  .LT.  200.0)  THEN 

1197  BLUEENGAGE(BLUEDETECT1(UNIT, POSITION) )= 

*  BLUEENGAGE(BLUEDETECT1 (UNIT, POSITION) )+l 

1198  END  IF 

1199  RETURN 

1200  END 


1201 
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1203 
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1232 

1233 

1234 

1235 

1236 

1237 
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1239 

1240 

1241 
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xxxxxxxxxxxxxxxxxx  FIRE  xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

SUBROUTINE  REDFIRECREDSTATUS, ELEMENT, REDENGAGE,BLUESTATUS, UNIT, 

X  POSITION, NUMBLUE,REDXPOS,REDYPOS,NUNIT,VEHTYPE, 

X  REDDETECT1,REDDETECT2,BLUEX1P0S,BLUEY1P0S,DSEED, 

X  CLOCK, RVEHTYP,RPHITS, RPHITM, RPKILL , DFKILL , REP, DFTYPE) 

INTEGER  REDSTATUS,ELEMENT,REDENGAGE,BLUESTATUS, UNIT, POSITION 
INTEGER  NUMBLUE, SHOT, REDDETECT1,REDDETECT2, LOOP, NUNIT,RVEHTYP 
INTEGER  VEHTYPE, DFKILL, REP, DFTYPE 
REAL  RANGE, REDXPOS, REDYPOS, BLUEXIPOS, BLUEYIPOS 
REAL  PHIT,PKILL,RNDNUM, CLOCK, RPHITS, RPHITM, RPKILL 
REALX8  DSEED 

DIMENSION  REDSTATUSC30),REDENGAGE( 100 ),REDXPOS( 30), DFKILL (100) 
DIMENSION  REDDETECT1(30),REDDETECT2(30),REDYPOS(30),VEHTYPE(10,20) 
DIMENSION  BLUESTATUS(10,20),BLUEX1POS(10,20),BLUEY1POS(10,20) 
DIMENSION  RNDNUM(10),RVEHTYP(S0),RPHITS(10),RPHITM(10),RPKILL(10) 
DIMENSION  DFTYPECIO) 

REDSTATUS(ELEMENT)=1 

SH0T=REDDETECT1 ( EL  EMENT) 

LOOP  =  1 
GO  TO  67 

97  SHOT  =  REDDETECT2( ELEMENT) 

LOOP  *  2 

67  IF  (SHOT  .EQ.  0)  THEN 

GO  TO  87 

ELSE  IF  (SHOT  .GT.  0)  THEN 
DO  27  I=1,NUNIT 

IF  (SHOT  .LE.  IXNUMBLUE)  THEN 
UNIT  =  I 

POSITION  =  SHOT  -  ((UNIT-DXNUMBLUE) 

GO  TO  88 
END  IF 

27  CONTINUE 

END  IF 

88  RANGE=(SQRT(((REDXPOS( EL EMENT)-BLUEX1P0S( UNIT, POSITION) )XX2)+ 

X  (( REDYPOSC ELEMENT)-BLUEY1P0S( UNIT, POSITION) )XX2)))/10 

IF  (RVEHTYP(ELEMENT)  .EQ.  2)  THEN 
IF(RANGE  ,LT.  .250)  THEN 
PHIT  =  RPHITM(5) 

PKILL  =  RPKILL(5) 

ELSE  IF  (RANGE  .LT.  1.000)  THEN 
PHIT  =  RPHITM(6) 

PKILL  =  RPKILL(6) 

ELSE  IF  (RANGE  .LT.  1.500)  THEN 
PHIT  =  RPHITM(7) 

PKILL  =  RPKILL(7) 

ELSE  IF  (RANGE  .LT.  2.500)  THEN 
PHIT  =  RPHITM(8) 

PKILL  =  RPKILL(8) 

ELSE  IF  (RANGE  .LT.  4.400)  THEN 
PHIT  =  RPHITM(9) 

PKILL  =  RPKILL(9) 

END  IF 
GO  TO  76 
END  IF 

IF(RANGE  .LT.  .500)  THEN 
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1251 

1252 

1253 

1254 

1255 

1256 

1257 

1258 

1259 

1260 
1261 
1262 

1263  76 

1264 

1265 

1266 

1267 

1268 

1269 

1270 

1271 


1272  747 


PHIT  =  RPHITM(l) 

PKILL  =  RPKILLd) 

ELSE  IF  (RANGE  .LT.  1.000)  THEN 
PHIT  =  RPHITM(2) 

PKILL  =  RPKILL(2) 

ELSE  IF  (RANGE  .LT.  2.000)  THEN 
PHIT  =  RPHITM(3) 

PKILL  *  RPKILL(3) 

ELSE  IF  (RANGE  .LT.  3.300)  THEN 
PHIT  =  RPHITM(4) 

PKILL  *  RPKILL(4) 

END  IF 

CALL  GGUBS(DSEED,2,RNDNUM) 

IF  (BLUESTATUS(UNIT, POSITION)  .EQ.  0)  GO  TO  87 
IF  (RNDNUM(l)  .LE.  PHIT)  THEN 

IF  (RNDNUM(2)  .LE.  PKILL)  THEN 

BLUESTATUS(UHIT, POSITION)  =  0 
DFKILL(REP)=DFKILL(REP)+1 

DFTYPE(VEHTYPE(UNIT,POSITION))=DFTYPE(VEHTYPECUNIT,POSITION))+1 
REDENGAGE((NUMBLUEX(UNIT-1))+P0SITI0N)  =  2 
WRITE(54/747)  CLOCK, ELEMENT, RANGE, UNIT, POSITION, 

*  VEHTYPE(UNIT, POSITION) 

F0RMAT(1X,F5.1, •  RED  ‘,12, »  RANGE  •,F6.3, 

*  •  KILLED  BLUE’, 213, •  VEHTYPE  ’,12,’  BBBBBBBBBBB ' ) 

GO  TO  87 
END  IF 

END  IF 


1276  REDENGAGE((NUMBLUE*(UNIT-1))+P0SITI0N)  = 

X  REDENGAGE((NUMBLUE*(UNIT-1))+P0SITI0N)  -  1 

1277  87  IF  (LOOP  .EQ.  1)  THEN 

1278  GO  TO  97 

1279  END  IF 

1280  RETURN 

1281  END 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 


1282  SUBROUTINE  BLUEFIRE(REDSTATUS, ELEMENT, BLUEENGAGE, BLUESTATUS, UNIT, 

X  POSITION, REDXPOS.REDYPOS,RVEHTYP, 

X  BLUEDETECTl , BLUEXIPOS, BLUEYIPOS, D5EED, 

X  CLOCK, BPHITS,BPKILL) 

1283  INTEGER  REDSTATUS, ELEMENT, BLUEENGAGE, BLUESTATUS, UNIT, POSITION 

1284  INTEGER  BLUEDETECTl , RVEHTYP 

1285  REAL  RANGE, REDXPOS , REDYPOS, BLUEXIPOS, BLUEYIPOS 

1286  REAL  PHIT, PKILL , RNDNUB, CLOCK, BPHITS, BPKILL 

1287  REALX8  DSEED 

1288  DIMENSION  REDSTATUS(30),BLUEENGAGE(30),REDXPOS(30) 

1289  DIMENSION  BLUEDETECT1(10,20),REDYPOS(30) 

1290  DIMENSION  BLUESTATUS( 10, 20), BLUEXIPOS! 10, 20), BLUEYIPOS! 10, 20) 

1291  DIMENSION  RNDNUB(10),RVEHTYP(30),BPHITS(10),BPKILL(10) 

1292  BLUESTATUS(UNIT,P0SITI0N)=1 

1293  ELEMENT=BLUEDETECT1( UNIT, POSITION) 

1294  RAN6E=(SQRT( ((REDXP0S( ELEMENT )-BLUEXlPOS( UNIT, POSIT  ION) )XX2)  + 

X  ( (REDYPOS! ELEMENT)-BLUEY1P0S( UNIT, POSITION) )XX2)))/10 

1295  IF  (RVEHTYP! ELEMENT)  .EQ.  2)  THEN 

1296  IF(RANGE  .LT.  .500)  THEN 
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1297 

1298 

1299 

1300 

1301 

1302 

1303 

1304 

1305 

1306 

1307 

1308 

1309 

1310 

1311 

1312 

1313 

1314 

1315 

1316 

1317 

1318 

1319 

1320 

1321 

1322 

1323 

1324 

1325 

1326 

1327 

1328 

1329 

1330 

1331 

1332 

1333 

1334 

1335 


1336 

1337 


PHIT  =  BPHITS(5) 

PKILL  =  BPKILL(5) 

ELSE  IF  (RANGE  .LT.  1.000)  THEN 
PHIT  =  BPHITS(6) 

PKILL  =  BPKILL(6) 

ELSE  IF  (RANGE  .LT.  2.000)  THEN 
PHIT  =  BPHITS(7) 

PKILL  =  BPKILL(7) 

ELSE  IF  (RANGE  .LT.  3.300)  THEN 
PHIT  =  BPHITS(8) 

PKILL  =  BPKILL(8) 

END  IF 
GO  TO  74 
END  IF 

IF(RANGE  .LT.  .500)  THEN 
PHIT  =  BPHITS(l) 

PKILL  =  BPKILL(l) 

ELSE  IF  (RANGE  .LT.  1.000)  THEN 
PHIT  =  BPHITS(2) 

PKILL  =  BPKILL(2) 

ELSE  IF  (RANGE  .LT.  2.000)  THEN 
PHIT  =  BPHITS(3) 

PKILL  =  BPKILL(3) 

ELSE  IF  (RANGE  .LT.  3.300)  THEN 
PHIT  =  BPHITS(4) 

PKILL  =  BPKILL(4) 

END  IF 

74  CALL  GGUBS(DSEED,2,RNDNUB) 

IF  (REDSTATUS( ELEMENT)  .EQ.  0)  GO  TO  83 
IF  (RNONUB(l)  .LE.  PHIT)  THEN 

IF  (RNDNUB(2)  .LE.  PKILL)  THEN 
REDSTATUS( ELEMENT)  =  0 
BLUEENGAGE( ELEMENT)  =  4 

WRITE(54,777)  CLOCK, UNIT, POSITION, RANGE, ELEMENT 
777  F0RMAT(1X,F5.1,  •  BLUE  ',214,'  AT  RANGE  ’,F6.S,'  KILLED  RED  M3, 

*  •  RRRRRRRRRRRRRRR’) 

GO  TO  83 
END  IF 

END  IF 

BLUEENGAGE( ELEMENT)  =  BLUEENGAGE( ELEMENT)-! 


83  RETURN 

END 
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APPENDIX  C 


DATA  FILES  TO  SUPPORT  THE  PROGRAM 
This  appendix  contains  the  data  flies  used  In  the 
program  listed  In  Appendix  B.  Most  data  files  can  be 

expanded  or  reduced  as  long  as  the  appropriate  parameters 
are  changed  In  the  program. 
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The  network  is  supported  by  the  MINEMET  data  file  shown 
below.  The  first  column  is  the  arc  number/  the  second  column 
is  the  node  number  of  the  tail  of  the  arc  while  the  third 
column  is  the  node  number  of  the  head  of  the  arc.  The 
fourth  column  is  the  distance  associated  with  the  arc  while 


alumn 

is 

the  1 

heading  of 

the  ai 

1 

1 

2 

2.92 

5.616 

2 

1 

3 

3.13 

5.989 

3 

2 

13 

1.44 

5.692 

4 

3 

4 

0.67 

1.107 

5 

3 

5 

1.25 

0.499 

6 

4 

7 

1.86 

0.633 

7 

5 

6 

0.54 

0.381 

8 

7 

8 

0.41 

6.141 

9 

6 

9 

0.48 

0.322 

10 

8 

11 

1.26 

6.141 

11 

9 

10 

0.92 

6.056 

12 

10 

22 

1.23 

6.064 

13 

11 

12 

1.00 

6.141 

14 

12 

26 

0.61 

0.000 

15 

13 

14 

0.92 

6.064 

16 

14 

19 

1.84 

0.704 

17 

19 

20 

0.81 

0.704 

18 

14 

15 

0.92 

5.865 

19 

15 

16 

0.70 

6.005 

20 

16 

17 

0.62 

0.464 

21 

17 

18 

0.71 

1.373 

22 

18 

23 

0.76 

0.785 

23 

23 

24 

0.71 

0.785 

24 

24 

25 

0.99 

0.785 

25 

20 

21 

0.64 

0.675 

26 

21 

22 

0.99 

0.644 

27 

22 

26 

0.54 

0.927 

28 

25 

26 

0.82 

1.816 

29 

26 

27 

0.70 

5.819 

30 

27 

28 

0.53 

0.927 

31 

28 

29 

0.00 

0.000 
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The  NODLOC  file  is  the  physical  location  of  each  node 
in  the  network.  The  first  column  is  the  node,  the  second  is 
the  X  coordinate  while  the  third  is  the  y  coordinate.  If  the 
X  and  y  coordinate  were  put  together  they  would  represent  the 
standard  six  digit  grid  coordinate  system. 


1 

583 

229 

2 

606 

211 

3 

613 

220 

4 

616 

226 

5 

624 

226 

6 

635 

230 

7 

631 

237 

8 

635 

236 

9 

639 

231 

10 

648 

229 

11 

647 

232 

12 

657 

232 

13 

618 

203 

14 

627 

201 

15 

636 

197 

16 

643 

195 

17 

649 

198 

18 

650 

205 

19 

640 

214 

20 

647 

218 

21 

652 

222 

22 

660 

228 

23 

653 

212 

24 

658 

217 

25 

665 

224 

26 

663 

232 

27 

669 

229 

28 

672 

233 

29 

672 

233 

■ 


The  Avenue  Data  is  used  to  support  the  Movement  network. 
Each  value  is  an  arc  number,  with  each  avenue  represented  by 
a  column  of  arcs.  The  last  arc  in  the  network,  arc  31  is  an 
arc  with  no  speed  associated  with  it,  so  if  a  unit  reaches  that 
arc  (which  is  past  the  objective)  it  would  essentially  remain  in 
position  unitl  the  arrival  of  the  rest  of  the  units. 


2 

2 

1 

1 

4 

5 

3 

3 

6 

7 

15 

15 

8 

9 

16 

18 

10 

11 

17 

19 

15 

12 

25 

20 

14 

27 

26 

21 

29 

29 

27 

22 

30 

30 

29 

23 

31 

31 

30 

24 

31 

31 

31 

28 

31 

31 

31 

29 

31 

31 

31 

30 

I 


i  ■ 

r- 
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The  SPEED  file  represents  the  speeds  that  the  various 
types  of  equipment  in  the  unit  are  able  to  maintain  over  the 
various  arcs.  The  speeds  are  affected  by  terrain^  roads>  cities 
and  other  natural  objects  such  as  forests.  The  columns  in 
order  represent  an  Ml>  a  mineplow  tank  with  the  plowin  the 
raised  position,  a  mineroller  tank  with  the  rollers  in  the 
position,  a  mineplow  tank  with  the  plow  employed,  and  finally 
the  mineroller  tank  in  the  breaching  mode, 
raised  position,  a  mineroller  tank  with  the  roller 


27 

21 

16 

9 

12 

27 

21 

16 

9 

12 

27 

21 

16 

9 

12 

20 

13 

10 

9 

8 

24 

19 

13 

8 

10 

27 

21 

16 

9 

12 

24 

19 

13 

8 

10 

27 

21 

16 

9 

12 

27 

21 

16 

9 

12 

27 

21 

16 

9 

12 

27 

21 

16 

9 

12 

27 

21 

16 

9 

12 

20 

13 

10 

9 

8 

13 

8 

7 

4 

5 

27 

21 

16 

9 

12 

27 

21 

16 

9 

12 

27 

21 

16 

9 

12 

27 

21 

16 

9 

12 

27 

21 

16 

9 

12 

33 

26 

19 

9 

12 

33 

26 

19 

9 

12 

27 

21 

16 

9 

12 

27 

21 

16 

9 

12 

27 

21 

16 

9 

12 

27 

21 

16 

9 

12 

27 

21 

16 

9 

12 

17 

11 

8 

5 

7 

27 

21 

16 

9 

12 

27 

21 

16 

9 

12 

40 

31 

24 

9 

12 

27 

21 

16 

9 

12 
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This  file  is  used  to  input  the  type  and  order  of  the 
equipment  in  each  ofthe  units.  The  only  three  codes  used  are: 

1  for  an  Ml,  2  for  a  mineplow  tank,  and  three  for  a  mineroller 
tank.  The  vehicles  can  be  placed  in  any  order  and  the  units 
do  not  have  to  be  configured  the  same,  either  in  the  type  of 
equipment  or  the  order  in  which  it  is  entered. 

2  2  2  2 
2  2  2  2 
3  3  3  3 

3  3  3  3 

1111 
1111 
1111 
1111 
1111 
1111 
1111 
1111 
1111 
1111 
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The  following  is  an  example  of  the  file  that  support  the 
formations.  The  offsets  in  the  x  and  y  directions  are  given 
in  hundreds  of  meters,  therefore  the  value  -2.50  would  be  two 
hundred  and  fifty  maters  in  either  the  minus  x  direction  if 
it  was  in  the  first  column  or  the  minus  y  direction  if  it  was 
in  the  second  column. 

-5.00  ,00 

-7.00  .00 

-6.50  .50 

-6.50  -.50 

-6.00  .00 
-0.50  A. 00 
-0.50  -4.00 

-1.00  -3.50 

-0.50  -3.00 

-0.50  3.00 

-1.00  3.50 

.00  .00 

.00  -3.50 

.00  3.50 
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The  delta  used  in  this  file  represents  the  blue  probability 
of  hitting  a  target  given  a  range  band  and  then  the  probability 
of  killing  the  target  given  a  hit.  The  first  column  is  the  hit 
probability  while  the  second  is  the  kill  probability. 

X.XX  X.XX 
X.XX  X.XX 
X.XX  X.XX 
X.XX  X.XX 
X.XX  X.XX 
X.XX  X.XX 
X.XX  X.XX 
X.XX  X.XX 
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The  REDPOSN  file  represents  the  physical  location  of 
each  red  element  in  the  unit.  The  first  column  is  the 
element  number/  the  secon  is  the  x  coordinate/  and  the  third 
is  the  y  coordinate.  If  the  two  coordinates  were  put  together 
they  would  represent  a  standard  eight  digit  grid  coordinate. 


1 

666.5 

228.0 

2 

668.0 

228.5 

3 

665.5 

230.0 

4 

663.5 

229.5 

5 

663.5 

230.5 

6 

662.0 

231.5 

7 

662.0 

232.5 

8 

661.0 

235.0 

9 

661.5 

235.0 

10 

663.5 

233.0 

11 

667.0 

229.5 

12 

665.5 

231.0 

13 

663.5 

232.0 

The  RPLOOK  file  is  used  in  the  red  DETECTION  subroutine 
and  represents  the  probability  that  the  observer  is  looking 
in  the  direction  of  the  target/  in  this  case  each  of  the  four 
avenues  of  approach  used  by  the  blue  forces.  They  are  user 
input  and  the  probability  of  looking  in  all  directions  does 
not  have  to  add  to  1. 


0.10 

0.10 

0.35 

0.40 

0.10 

0.10 

0.35 

0.40 

0.10 

0.10 

0.35 

0.40 

0.10 

0.25 

0.40 

0.20 

0.10 

0.25 

0.40 

0.20 

0.10 

0.25 

0.40 

0.20 

0.40 

0.40 

0.10 

0.05 

0.40 

0.40 

0.10 

0.05 

0.40 

0.40 

0.10 

0.05 

0.25 

0.25 

0.25 

0.25 

0.05 

0.10 

0.40 

0.40 

0.05 

0.10 

0.40 

0.40 

0.30 

0.40 

0.15 

0.10 
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The  RVEHTYP  file  supports  the  red  unit  in  terms 
of  type  of  equipment#  height#  range  adjustment  factor 
and  maximum  effective  range.  The  first  column  is  the 
vehicle  type#  with  a  1  representing  a  tank#  while  a  2 
represents  a  BMP.  Column  2  is  the  height  of  the  vehicle 
while  column  3  is  the  range  adjustment  factor  (RAF)  used 
in  the  simulation.  The  RAF  represents  the  range  difference 
that  would  be  required  between  a  tank  and  a  BMP  before  the 
the  BMP  would  be  engaged.  The  last  column  is  the  maximum 
effective  range  of  the  weapon  system. 
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2.3 

0 

3.0 

1 

2.3 

0 

3.0 

1 

2.3 

0 

3.0 

1 

2.3 

0 

3.0 

1 

2.3 

0 

3.0 

1 

2.3 

0 

3.0 

1 

2.3 

0 

3.0 

1 

2.3 

0 

3.0 

1 

2.3 

0 

3.0 

1 

2.3 

0 

3.0 

2 

2.1 

0.4 

4.0 

2 

2.1 

0.4 

4.0 

2 

2.1 

0.4 

4.0 
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